关于access查询
Private Sub Find_Click(Index As Integer)
Dim Name
Name = InputBox$("请输入姓名", "按姓名搜索", "张三")
If Name <> "" Then
Name = "姓名='" & Name & " '"
Data1.Recordset.FindFirst Name
End If
End Sub
提示 Data1.Recordset.FindFirst Name 出错
请达人指教
