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

上記のコードは、検索しているデータが数値のみの場合に機能します。たとえば、ライセンスIDであるL_Idに基づいてデータを検索すると、整数値が検索され、結果が得られます。ライセンス番号である L_No に基づいてデータを検索すると、数字とアルファベットの両方で構成される文字列値になり、上記のエラーが発生します。

値が text1.text であることを解析する必要がありますか、それとも他に何かする必要がありますか?

4

1 に答える 1

1

検索するフィールドが数値型でない場合は、一重引用符で区切ります。

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