Ms access 基于组合框填充多个文本字段

Ms access 基于组合框填充多个文本字段,ms-access,Ms Access,我试图做的是根据用户在组合框中选择的内容填充文本字段。我遇到的问题是文本字段需要来自多个查询的数据。每个查询一个文本框,总共有6个。因此me.txtextbox1=me.cbocombox1.column(1)将无法工作。这可能是一个非常简单的修复方法,但如果有任何帮助,我们将不胜感激。您需要一个事件过程来处理组合框的更新后事件。在该过程中,可以使用DLookup函数使用6条语句,但该函数非常慢。因此,我建议打开返回(最多)一条记录的6个记录集来检索6个文本框的值。使用6个参数化查询时,代码可能

我试图做的是根据用户在组合框中选择的内容填充文本字段。我遇到的问题是文本字段需要来自多个查询的数据。每个查询一个文本框,总共有6个。因此me.txtextbox1=me.cbocombox1.column(1)将无法工作。这可能是一个非常简单的修复方法,但如果有任何帮助,我们将不胜感激。

您需要一个事件过程来处理组合框的更新后事件。在该过程中,可以使用
DLookup
函数使用6条语句,但该函数非常慢。因此,我建议打开返回(最多)一条记录的6个记录集来检索6个文本框的值。使用6个参数化查询时,代码可能如下所示:

Private Sub cboComboBox1_AfterUpdate()

    With CurrentDb

        Me.txtTextBox1 = Null
        With .QueryDefs("qryQuery1")
            !ParameterNameInQuery1 = Me.cboComboBox1
            With .OpenRecordset()
                If Not .EOF Then
                    Me.txtTextBox1 = !NameOfFieldInQuery1
                End If
                .Close
            End With
            .Close
        End With

        ' ... other 5 code Fragments for the other 5 textboxes ...

    End With

End Sub

我读了你的问题好几遍,你的意图仍然不清楚。请详细说明并提供当前和预期情况的例子。