Foxtable(狐表)用户栏目专家坐堂 → [求助]DataTable查找符合条件的行Find语句遇特殊符号出错


  共有2448人关注过本帖树形打印复制链接

主题:[求助]DataTable查找符合条件的行Find语句遇特殊符号出错

帅哥哟,离线,有人找我吗?
WELOVEFOX
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3343 威望:0 精华:0 注册:2016/12/21 22:58:00
[求助]DataTable查找符合条件的行Find语句遇特殊符号出错  发帖心情 Post By:2020/6/15 17:44:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:2020-06-15_17-33-18.png
图片点击可在新窗口打开查看




图片点击可在新窗口打开查看此主题相关图片如下:2020-06-15_17-39-10.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:2020-06-15_17-40-51.png
图片点击可在新窗口打开查看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:demo.zip



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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105965 积分:538900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/15 20:03:00 [只看该作者]

dr = DataTables("表A").Find("[备注] = '" & s.replace("'","''") & "'") 

 回到顶部
帅哥哟,离线,有人找我吗?
WELOVEFOX
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3343 威望:0 精华:0 注册:2016/12/21 22:58:00
  发帖心情 Post By:2020/6/16 8:42:00 [只看该作者]

谢谢蓝板图片点击可在新窗口打开查看

 回到顶部