Dim keyword as stringIf datasearch.projectname_d.Text <> "" Then keyword = keyword & "temp.project_r = datasearch.projectname_d.Text"
If datasearch.date1 <> 0 Then keyword = keyword & " And temp.testdate_r >= datasearch.date1"
If id1 <> 0 Then keyword = keyword & " And temp.id_r >= id1 And temp.id_r <= id2"
If datasearch.name_d.Text <> "" Then keyword = keyword & " And temp.name_r = datasearch.name_d.Text"If Trim(keyword) Then......End If运行到If Trim(keyword) Then这一行时说类型不匹配。该如何解决?
If datasearch.date1 <> 0 Then keyword = keyword & " And temp.testdate_r >= datasearch.date1"
If id1 <> 0 Then keyword = keyword & " And temp.id_r >= id1 And temp.id_r <= id2"
If datasearch.name_d.Text <> "" Then keyword = keyword & " And temp.name_r = datasearch.name_d.Text"If Trim(keyword) Then......End If运行到If Trim(keyword) Then这一行时说类型不匹配。该如何解决?
解决方案 »
- 请各位帮我看看这个问题要怎么解决?
- 在用VB6.0写一个小程序时遇到的问题
- 请问用VB怎么接受在WEBSERVICE传过来的数据集,VB中有datatable这样的东东吗?
- 如何用语句备份和恢复SQL2000中的几个表,注意,不是整个库!!
- 各位高手,拉小弟一把吧!我实在没有分数了,以后一定回报大家!!
- 关于在系统安装的时候建立数据库文件(sql2000)
- 拜托,高手快出现啊,救我的小命啊,第一个人回答正确的给你全分,而且分不够我可以加
- 又一个极菜的问题(关于窗体)。 在线立即结贴。
- Access数据库应该用什么数据库引擎驱动?
- 如何使系统键:WIN,ALT+TAB,CTRL+ESC无效
- 嵌套查询、联合查询的问题(sql语句较长,请各位帮助解答一下语法的错误)
- 如何把一个控件从一个对象拖动到另一个对象??
If Trim(keyword)<>'' Then......End If
這種格式倒可以
If Not IsNull(keyword) Then
不是判断keyword是否为空!相关内容也可以参考我另一个帖子http://community.csdn.net/Expert/topic/3596/3596599.xml?temp=.1548883
keyword = "a>b and c<d and e=f"
if keyword then ....
也就是说第2句要达到if a>b and c<d and e=f then...的效果。
VB里面是不是没法实现的啊?