access2003についての質問です。

質問

access2003についての質問です。

下記の様なテーブルがあります。
ID、商品名

フォームにてtextbox1にIDを入力したらtextbox2に商品名が表示される様にするにはどうすればいいですか？
どなたか教えて下さい。

宜しくお願いしますm(_ _)m

回答No.3

piroin654

テキストボックスの名前が微妙に変わっていたので
質問に合わせると、

Private Sub textbox1_AfterUpdate()
Me!textbox2 = DLookup("商品名", "テーブル1", "ID ='" & Me![textbox1] & "'")
End Sub

です。

テキスト型の場合は、

"ID ='" & Me![textbox1] & "'"

数値型の場合は、

"ID =" & Me![textbox1]

です。

お礼

丁寧に教えてくださってありがとうございました！
解決しました！感謝します！

回答No.2

piroin654

テキスト型ならば、以下にしてください。

Private Sub tx1_AfterUpdate()
Me!tx2 = DLookup("商品名", "テーブル1", "ID ='" & Me![tx1] & "'")
End Sub

回答No.1

piroin654

フォームをデザインビューで開き、textbox1の
プロパティシートを開き、その更新後処理の項目から
コードビルダを選択し、textbox1の更新後処理を以下
のように設定します。

Private Sub textbox1_AfterUpdate()
Me!textbox2 = DLookup("商品名", "テーブル1", "ID =" & Me![textbox1])
End Sub

あるいは、上記のコードをフォームのコード表に
貼り付け、保存してもいいです。
Meはフォーム自身を示しています。

補足

ありがとうございます。
IDを入力すると

『抽出条件でデータ型が一致しません』

というエラーが出てしまいます。
データ型は両方ともテキスト型にしてるのですが
何が影響してるのかわかりません。

どなたか教えていただけますでしょうか。
宜しくお願いしますm(_ _)m