VB 查询VFP数据库弹出missing operand错误

Question

Private Sub Command1_Click()
Adodc1.RecordSource = "select * from 节点温湿度信息表 where 日期=#" & DTPicker1.Value & "#"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End Sub执行这个控件后弹出missing operand错误，这该怎么解决？

Answer 1

《missing operand》 这个是缺少操作数的意思，就是说 DTPicker1.Value 这个值是空值，不知道你的 DTPicker1控件是什么控件，他是否有Value属性，这个属性是值是不是日期格式的值？ 

Answer 2

如果有Value这个属性，而且，DTPicker1.Value的值也是日期格式的，估计你这个值是字符串，需要修改：
Adodc1.RecordSource = "select * from 节点温湿度信息表 where 日期=#" & CDate(DTPicker1.Value) & "#"
将值修改为日期类型数据。

Answer 3

DTPicker的格式是dtpshortdate，数据库是VFP，按照你的方法还是抱同样的错误

Answer 4

你查询的这个值 《DTPicker1.Value》是空值，那么你的这个值是什么？在哪里得到的，首先检查这个值存在不存在，如果不存在检查原因，只要这个值存在（即不是空值），那么就应该没有问题。
已经问过你了，你的这个值是什么，不知道你的这个值的来源，不好回答。

Answer 5

这个值就是日期型数据，我用text1文本框可以将DTPicker显示出来，text1.text=DTPicker.value
DTPicker是一个日期型控件