注册 登录
编程论坛 VB6论坛

VB6.0中多个条件一起查询的代码,请求帮忙!

wangyiaihu 发布于 2020-05-11 13:14, 2301 次点击
只有本站会员才能查看附件,请 登录

要求:如图所示中,查询 满足红色圈内的4个条件,
注意:设备编号与确认状态是COMBO控件,开始时间与截至时间 是 DTPicker控件,

rs11.Open "Select * from 数据 Where 设备编号='" & Combo1.Text & "' And 确认状态='" & Combo4.Text & "'and 提交日期 between '" & DTPicker1.Value & "' and '" & DTPicker2.Value & "' ", conn11, 3, 2

以上代码是我自己写的,运行时报错,请大神帮忙修改。。。满足查询图上4个条件。
4 回复
#2
wangyiaihu2020-05-11 23:13
大神?高手?
都哪里去了?
#3
show1472020-05-26 22:28
rs11.Open "Select * from 数据 Where 设备编号='" & Combo1.Text & "' And 确认状态='" & Combo4.Text & "'and 提交日期 between '" & DTPicker1.Value & "' and '" & DTPicker2.Value & "' ", conn11, 3, 2

看起来是提交日期有问题 改成这样
提交日期 between #" & DTPicker1.Value & "# and #" & DTPicker2.Value & "# ",
#4
ZHRXJR2020-05-27 16:56
以下是引用show147在2020-5-26 22:28:51的发言:

rs11.Open "Select * from 数据 Where 设备编号='" & Combo1.Text & "' And 确认状态='" & Combo4.Text & "'and 提交日期 between '" & DTPicker1.Value & "' and '" & DTPicker2.Value & "' ", conn11, 3, 2

看起来是提交日期有问题 改成这样
提交日期 between #" & DTPicker1.Value & "# and #" & DTPicker2.Value & "# ",


应该将日期变量转换为日期数据类型,DTPicker1.Value 的数据是字符串数据。
提交日期 between #" & CDate(DTPicker1.Value) & "# And #" & CDate(DTPicker2.Value) & "#
#5
wangyiaihu2020-05-28 05:13
回复 4楼 ZHRXJR
这个问题,之前已在你的帮助下搞定
1