Dim kwTable As DataTable
Dim foundRows As DataRow()
Dim tmpstr As String
为什么 foundRows = kwTable.Select(keyword ='tmpstr')（这个是错的）
或者foundRows = kwTable.Select(“keyword ='tmpstr'”)不能代替
foundRows = kwTable.Select("keyword = '" & Replace(tmpstr, "'", "''") & "'")（这个是对的）

你需要知道啥是变量，啥是字符串，咋样拼接查询语句

发现是自己犯了低级错误，头晕了，谢谢