Foxtable(狐表)用户栏目专家坐堂 → [求助]代码错误


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

主题:[求助]代码错误

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


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
[求助]代码错误  发帖心情 Post By:2016/9/10 15:35:00 [只看该作者]

窗口中通过患者姓名(s1)或出生日期(s2)组成字符串(s3),进行查询。代码如下:

Dim s1 As String =e.Form.Controls("TextBox1").value
Dim s2 As Date= e.Form.Controls("DateTimePicker1") .value
Dim s3 As String =s1 & Format(s2,"yyyyMMdd")

MainTable = Tables("基本情况")
Tables("基本信息_table1").Filter="patientsID like'" & "'%'" & s3 & "'%'"'"

提示错误如下:
图片点击可在新窗口打开查看此主题相关图片如下:360反馈意见截图16840930116130102.png
图片点击可在新窗口打开查看

我检查了好像不多“’”

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


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2016/9/10 15:45:00 [只看该作者]

搞定。Tables("基本信息_table1").Filter="patientsID like'" & "%" & s3 & "%" & "'"

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


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2016/9/10 15:46:00 [只看该作者]

代码还有其他问题。如日期为空,需要排除。

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


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/10 16:25:00 [只看该作者]

贴出代码

 回到顶部