
vb中参数类型不正确或不在可以接受的范围内是什么原因造成的
PrivateSubCommand1_Click()DimmnoAsStringmno=InputBox("请输入图书索引号","图书索引号查询")Adodc1.Reco...
Private Sub Command1_Click()
Dim mno As String
mno = InputBox("请输入图书索引号", "图书索引号查询")
Adodc1.Recordset.Find "图书索引号=‘" & mno & "'", , , 1
If Adodc1.Recordset.EOF Then MsgBox "无此图书索引号", , "提示"
End Sub
运行时单击索引号查询便出现了问题
把单引号去掉后没有错误了,但是查询时没有任何反应 展开
Dim mno As String
mno = InputBox("请输入图书索引号", "图书索引号查询")
Adodc1.Recordset.Find "图书索引号=‘" & mno & "'", , , 1
If Adodc1.Recordset.EOF Then MsgBox "无此图书索引号", , "提示"
End Sub
运行时单击索引号查询便出现了问题
把单引号去掉后没有错误了,但是查询时没有任何反应 展开
2个回答
展开全部
看你的数据,图书索引号在数据库的数据类型不是字符型的吧,不能用单引号:
Adodc1.Recordset.Find "图书索引号=" & mno , , , 1
Adodc1.Recordset.Find "图书索引号=" & mno , , , 1
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询