急.......VB问题..
请问VB
3001错误是什么错误?
怎样解决?
3Q..
我要做查找的功能...
代码:
Private Sub cmdGO_Click()
adoDate.Recordset.Find Find & "=" & "'" & txtSearchID.Text & "'"
If adoDate.Recordset.EOF Then
Dim msg As Integer
msg = MsgBox("Sorry,this list didn't exist", 10, "Search Result")
txtSearchID.Text = ""
adoDate.Recordset.MoveFirst
End If
End Sub
运行...3001错误...
[此贴子已经被作者于2007-5-14 21:55:43编辑过]
