2

我是一名学生，正在做我最后一年的迷你项目，并且面临与在数据网格中搜索数据相关的问题。我得到的错误是：

运行时错误：“3001”参数类型错误、超出可接受范围或相互冲突

代码是：

Private Sub Command1_Click()
Dim item As String
    Adodc1.Recordset.MoveFirst
    item = Text1.Text
    Adodc1.Recordset.Find "L_No = " & item
    If Adodc1.Recordset.EOF Then
        MsgBox "Record Set not found"
    End If
End Sub

当我正在搜索的数据只是数字时，上面的代码正在工作。例如，当我根据 L_Id（许可证 ID 和整数值）搜索数据时，搜索完成，我得到了结果。当我根据 L_No 搜索数据时，L_No 是一个许可证号，一个由数字和字母组成的字符串值，我得到了上述错误。

我必须解析值是 text1.text 还是做其他事情？

4

1 回答 1

1

当您搜索的字段不是数字类型时，您需要用单引号将其分隔：

Adodc1.Recordset.Find "L_No = '" & item & "'"
于 2012-11-20T17:14:50.167 回答