我在数据库上创建了一个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事件中尝试了相同的代码 .
1 回答
您不需要单独的隐藏文本框 .
将经理电子邮件的文本框控制源链接到个人表字段,并在选择管理员区域时将文本框值更新为DLookup值 .
我不知道如何选择管理器区域,但作为组合框示例,它将是这样的: