Dim myConnection As Connection
Dim myRecordset As Recordset
===============
Private Sub Form_Load()
Dim myPath As String
Dim Str As String
Set myConnection = New Connection
myConnection.CursorLocation = adUseClient
myPath = App.Path & "\寝室.mdb"
myConnection.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & myPath
Set myRecordset = New Recordset
myRecordset.Open "SELECT * FROM 学生", myConnection, adOpenStatic, adLockOptimistic
myRecordset.Find ("姓名=asd")  “到这就过不去,说什么参数类型不正确或不
                                  在可接收的范围内,或与其他参数冲突’”End Sub
============================
Private Sub Form_Unload(Cancel As Integer)
myRecordset.Close
Set myRecordset = Nothing
End Sub
我已在引用中添加MS ActiveX Data Object 2.1 library.
请英雄赐教!!!!!

解决方案 »

  1.   

    myRecordset.Find ("姓名='asd'")
    这样行不行呀~?
      

  2.   

    myRecordset.Find ("姓名='asd'")  '字符串要用单引号括起来
      

  3.   

    各位老大容我把问题问完。 myRecout.Find ("姓名=" + txtsearch.Text)时,同样报
    “参数类型不正确或不可接收的范围内,或与其他参数冲突’”
      

  4.   

    myRecout.Find ("姓名='" &txtsearch.Text "'")
      

  5.   

    myRecout.Find ("姓名='" &txtsearch.Text &"'")
      

  6.   

    myRecout.Find ("姓名='" & txtsearch.Text & "'")
      楼主是不是先把别的人回答看完?
      要是还不行的话,那可能就是字段为中文字的问题了