[求助]一个关于数据库查询的问题
Dim a As String
Private Sub Command1_Click()
Dim rs As New ADODB.Recordset
Dim sql As String
sql = "select * from 入货表 where 日期 like '" & a & "'&'-'& '" & Combo1.Text & "'& '%'"
rs.Open sql, conn, adOpenKeyset, adLockPessimistic
Label7.Caption = rs.Fields(1) '此语句用来测试有没有查出数据
End Sub
Private Sub Form_Load()
Label2.Caption = Year(Date)
a = Label2.Caption
End Sub
为什么以上语句的RS.bof老是为真?
说明a 的值为年,combo1.text为1,2,3,4....
我的意思是:从combo1.text中选一个月值的数字(1,2,3等)进行数据库查询
数据库的日期字段是以文本形式存数据的,如:2007-9-9
[此贴子已经被作者于2007-9-10 14:25:57编辑过]