vb调试时对应所需要的名称或序数的集合中,未找到项目
Private Sub Command5_Click() '检索记录
Dim zjlx As String
zjlx = InputBox$("输入学号一个10位数的学号", "查找学生")
Adodc1.Recordset.MoveFirst
If zjlx <> "" Then
zjlx = "学号='" & zjlx & "'"
Adodc1.Recordset.Find (zjlx)
If Adodc1.Recordset.EOF Then
MsgBox "没有该同学", 48, "记录查询"
End If
End If
End Sub
vb调试时对应所需要的名称或序数的集合中,未找到项目
[解决办法]
因为你的记录集中 没有学号这个字段 才会提示这个错误
[解决办法]
数据表中的字段名与代码中的字段名不一致