窗体中有1个下拉框用于输入工号，还有一个文本框用于显示姓名。
要求：输入工号后，姓名自动显示出来。

(1)方法：在工号下拉框的“更新后”事件中加入代码。

例如："工号"下拉框的行来源是一个依次包含[工号]和[姓名]字段的查询，则在"工号"下拉框的更新后事件加入如下代码，就能实现"姓名"下拉框自动填充：

me.姓名=me.工号.column(1)

(2)还有一种办法：在工号下拉框的“更新后”事件中加入代码。

Private Sub IDNumber_AfterUpdate()
    Me.personName.RowSource = "SELECT personName FROM" & _
       " person WHERE IDNumber = " & Me.IDNumber & _
       " ORDER BY IDNumber"
    Me.personName = Me.person.ItemData(0)
End Sub