Dlookupの結果をAccessデータベースの別のテキストボックスに表示するにはどうすればよいですか？

Question

私は、マネージャーエリアが選択されるたびにマネージャーのEメールアドレスを変更するDlookup機能をデータベース上に作成しました。これはうまくいきますが、コントロールソースがDlookupになったので、結果を個人用テーブルに保存しなくなりました。

http://p2p.wrox.com/access-vba/77907-how-save-results-dlookup-function.html私はテーブルの結果を表示する別の隠しボックスを持つ方法を読んでいますが、問題はDlookup結果を他のテキストボックスに接続することです。

私は明らかにDlookupの結果を制御できないので、代わりに次のコードを使用して更新前のイベントにしてみました。

Option Compare Database 

Private Sub ASMail_AfterUpdate() 
ASMEmail.Value = ASMail.Value 
End Sub 

ただし、これはまったく影響しません。テキストボックスは、Dlookupの結果を調整するたびに変更されません。また、他のChangeイベントでも同じコードを試しましたが、どちらも機能しませんでした。

Answer 1

別の隠しテキストボックスは必要ありません。

個人用テーブルフィールドにリンクされたマネージャの電子メールのテキストボックスコントロールソースを残して、マネージャ領域が選択されているときにテキストボックス値をDLookup値に更新するだけです。

私はマネージャ・エリアが選択されているのか分からないが、コンボボックスの例として、それはこのようになります：

Private Sub Combo_AfterUpdate() 
    Me.ASMEmail.Value = Nz(DLookup("Value", "Domain", "Criteria"), vbNullString) 
End Sub