由于本人刚刚学VB但马上要写毕业设计了
郁闷的要命
不过其他的还都可以请那位高人指点一下
我自己这么写的但有错误
问题1：在vb中ado如何查询2个数（时间）之间的数据
ElseIf Option4.Value = True Then
Set Conn = New ADODB.Connection
Set rs = New ADODB.Recordset
Conn.Open ConnString
strSql = "select * from kcxx where kcl>=val(text1.text) and val(text2.text)"
rs.Open strSql, Conn, adOpenKeyset, adLockPessimistic
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
错误提示是实时错误'-2147217904(80040e10)'
[microsft][odbc microsoft access driver]参数不足，期待是2
问题2：
还有问题就是怎么做到DataGrid控件的关系显示。就是在datagrid1中显示一个ID,在datagrid2中显示ID的详细信息
问题3：
报表内的参数怎么设置？我打印的报表都是一次打好多张郁闷啊
问题4：备份与回复
怎么才能实现备份与回复

上边这些问题那位高人能快点给我举个例子和简单的说明就好
老师要的很急！再下先谢谢了

字段名错误吗？
还有其他的问题
请教啊！帮忙解答下

我知道这里错了
应该怎么改啊！求您拉！我很急

非常感谢这个问题解决了
请问怎么查询2个时间段间的东西？和上边语句一样吗？

strSql = "select * from kcxx where Kcl between '" & Val(DTPicker1.Value) & "' and '" & val(DTPicker1.Value) & "'"
rs.Open strSql, Conn, adOpenKeyset, adLockPessimistic
运行后出现这个标准表达式中类型不符合!
上边的那个是不是应该用!可能我又写错了！5555
请老大帮忙

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

上边那个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
我现在改成这个样子对吗？
不过还是出错误信息,标准表达式中类型不匹配