Access選擇組閤框的值自動填充文本框

前麵我們講過很多示例都會用到Dlookup來穫取所選擇的相關值。

比如下麵的示例，在窗體2中添加，組閤框名爲“combo0”，“姓名”文本框名爲“Text2”，“性彆”文本框名爲“Text4”，“職務”文本框名爲“Text6”

我們選擇工號後，自動填充，該工號的姓名，性彆和職務

1、可以使用Dlookup函數

 Me.Text2 = DLookup("姓名", "員工信息", "工號='" & Me.Combo0 & "'")
 Me.Text4 = DLookup("性彆", "員工信息", "工號='" & Me.Combo0 & "'")
 Me.Text6 = DLookup("職務", "員工信息", "工號='" & Me.Combo0 & "'")

2、使用Column函數

設置組閤框的行來源爲所有需要穫取的字段，列數爲4

SELECT 員工信息.工號, 員工信息.姓名, 員工信息.性彆, 員工信息.職務
FROM 員工信息;

詳細源碼：

Private Sub Combo0_AfterUpdate()
    Me.Text2 = Me.Combo0.Column(1)
    Me.Text4 = Me.Combo0.Column(2)
    Me.Text6 = Me.Combo0.Column(3)
    
End Sub