0

「MicrosoftOfficeAccessがフィールドを見つけることができません」というエラーが発生しました'|' DCount関数を使用してテーブル内のOrderNoオカレンスの数をカウントするときに「式で参照されます。OrderNoのデータ型はnumberです。これが私が行ったことです。

If DCount("[OrderNo]", "tblDisposition", "[OrderNo]='" & [txtOrderNo.Value] & "'") > 1 Then
    MsgBox "Duplicate data", vbOKOnly, "ERROR"
Else
    MsgBox "succeed"
End If

フォームのロードイベントで、tblDispositionでtxtOrderNoコントロールソースをOrderNoに設定しました。DLookup関数も使おうとしていますが、同じエラーのようです。

4

1 に答える 1

1

[txtOrderNo.Value]が間違っているようです。角かっこなしで試してください。例:

If DCount("[OrderNo]", "tblDisposition", "[OrderNo]=" & txtOrderNo.Value) > 1 Then
    MsgBox "Duplicate data", vbOKOnly, "ERROR"
Else
    MsgBox "succeed"
End If
于 2013-03-26T07:32:09.450 に答える