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

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

比如下面的示例，在窗體2中添加，組合框名為“combo0”，“姓名”文本框名為“Text2”，“性別”文本框名為“Text4”，“職務”文本框名為“Text6”

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

1、可以使用Dlookup函數(shù)

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

2、使用Column函數(shù)

設置組合框的行來源為所有需要獲取的字段，列數(shù)為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