Microsoft Access 2010中的多个组合框

时间:2015-06-12 03:13:19

标签: ms-access access-vba ms-access-2010

我需要3个组合框来自动填充/自动填充1个带有数据的文本框。我知道如何使用1个组合框自动填充1个文本框来完成此操作,但是我怎么能用3.它会是这样的?需要帮助。

Me.Textbox.Value = Me.Combobox1.Column(1) + Me.Combobox1.Column(2) + Me.Combobox1.Column(3)

1 个答案:

答案 0 :(得分:0)

要做到这一点,您只需将其添加到每个组合的AfterUpdate事件中:

 
Private Sub Combo1_AfterUpdate()

     If Nz(Me.Combo1.Column(1), "") <> "" And Nz(Me.Combo2.Column(2), "") <> "" And Nz(Me.Combo3.Column(3), "") <> "" Then
         Me.Text1.Value = Nz(Me.Combo1.Column(1), "") & " " & Nz(Me.Combo2.Column(2), "") & " " & Nz(Me.Combo3.Column(3), "")
     End If

End Sub

此部分:& " " &只是在每个值之间添加一个空格,如果您不需要,请将其删除。因此,在If语句中,您只需检查以确保在更新文本框之前所有组合框都已选中。