- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]DataTable查找符合条件的行Find语句遇特殊符号出错 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=151122)
-- 发布时间：2020/6/15 17:44:00
-- [求助]DataTable查找符合条件的行Find语句遇特殊符号出错
此主题相关图片如下：2020-06-15_17-33-18.png
此主题相关图片如下：2020-06-15_17-39-10.png
此主题相关图片如下：2020-06-15_17-40-51.png
Dim s As String = Trim(e.Form.Controls("TextBox1").TEXT)
DataTables("表A").Save
Dim dr As DataRow
dr = DataTables("表A").Find("[备注] = \'" & s & "\'") \'主要出错，就是这个s变量里面出现了\'或多个\',导致参数 \'" & s & "\'"，没有执行下去，所以此处求助下，看是BUG，还是方法不对
If dr IsNot Nothing Then
MessageBox.Show("YES 存在相同内容!")
Else
MessageBox.Show("NO 不存在相同内容!")
End If
[此贴子已经被作者于2020/6/15 17:44:28编辑过]
-- 发布时间：2020/6/15 20:03:00
--
dr = DataTables("表A").Find("[备注] = \'" & s.replace("\'","\'\'") & "\'")
-- 发布时间：2020/6/16 8:42:00
--
谢谢蓝板
