Ms access 基于组合框填充多个文本字段
我试图做的是根据用户在组合框中选择的内容填充文本字段。我遇到的问题是文本字段需要来自多个查询的数据。每个查询一个文本框,总共有6个。因此me.txtextbox1=me.cbocombox1.column(1)将无法工作。这可能是一个非常简单的修复方法,但如果有任何帮助,我们将不胜感激。您需要一个事件过程来处理组合框的更新后事件。在该过程中,可以使用Ms access 基于组合框填充多个文本字段,ms-access,Ms Access,我试图做的是根据用户在组合框中选择的内容填充文本字段。我遇到的问题是文本字段需要来自多个查询的数据。每个查询一个文本框,总共有6个。因此me.txtextbox1=me.cbocombox1.column(1)将无法工作。这可能是一个非常简单的修复方法,但如果有任何帮助,我们将不胜感激。您需要一个事件过程来处理组合框的更新后事件。在该过程中,可以使用DLookup函数使用6条语句,但该函数非常慢。因此,我建议打开返回(最多)一条记录的6个记录集来检索6个文本框的值。使用6个参数化查询时,代码可能
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
我读了你的问题好几遍,你的意图仍然不清楚。请详细说明并提供当前和预期情况的例子。