我需要3个组合框来自动填充/自动填充1个带有数据的文本框。我知道如何使用1个组合框自动填充1个文本框来完成此操作,但是我怎么能用3.它会是这样的?需要帮助。
Me.Textbox.Value = Me.Combobox1.Column(1) + Me.Combobox1.Column(2) + Me.Combobox1.Column(3)
答案 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
语句中,您只需检查以确保在更新文本框之前所有组合框都已选中。