Val(DTPicker1.Value) 是什么意思？
晕死！

Val　是将文本类型转为数值，日期型数据你转个P呀。

那用Cstr吗？
我很菜刚学不久
好多东西不！
表的这个类型是日期YYYY-MM-DD
这样可以比较吗？

上边那个SQL查询语句不是只能用数字格式嘛！我比较笨啦！还是请斑竹明示

strSql = "select * from kcxx where kcl between " & val(text1.text) & " and " & val(text2.text)

日期型的SQL查询根本不需要转换。

strSql = "select * from kcxx where kcl between ' " & text1.text& " 'and ' " & text2.text" ' "

不过日期型数据好像得加上单引号才能被查到。

因为Recordset.Open [SQL查询语句]这里的SQL查询语句的参数是字符串值。

ElseIf Option2.Value = True Then
Set Conn = New ADODB.Connection
Set rs = New ADODB.Recordset
Conn.Open ConnString
Dim strin1$, strin2$
strin1 = CStr(DTPicker1.Value)
strin2 = CStr(DTPicker2.Value)
strSql = "select * from kcxx where Rksj between ' " & strin1 & " 'and ' " & strin2 & " ' "
rs.Open strSql, Conn, 3, 3
Set DataGrid1.DataSource = rs
With DataGrid1
.Columns(0).Width = 1000
.Columns(0).Caption = "库存货物ID"
.Columns(1).Width = 1000
.Columns(1).Caption = "货物状态"
.Columns(2).Width = 1000
.Columns(2).Caption = "入库时间"
.Columns(3).Width = 1000
.Columns(3).Caption = "库存量"
.Columns(4).Width = 1000
.Columns(4).Caption = "最大库存量"
End With
DataGrid1.Visible = True
Exit Sub
我现在改成这个样子对吗？
不过还是出错误信息,标准表达式中类型不匹配

OK,不错.