【问题标题】:Multiple combo boxes in Microsoft Access 2010Microsoft Access 2010 中的多个组合框
【发布时间】:2023-03-26 17:19:01
【问题描述】:

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

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

【问题讨论】:

  • 您从组合框中添加的数据类型是什么?字符串?整数?
  • 我不想添加数据。如果这 3 个组合框有数据,那么它应该自动填充一个文本框。

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


【解决方案1】:

为此,您只需将其添加到每个组合的 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

这部分:&amp; " " &amp;只是在每个值之间加一个空格,不需要就去掉。因此,在If 语句中,您只是在更新文本框之前检查以确保所有组合框都已选择某些内容。

【讨论】:

    猜你喜欢
    • 2017-05-26
    • 2016-10-24
    • 1970-01-01
    • 1970-01-01
    • 2013-05-17
    • 1970-01-01
    • 2012-07-19
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多