从组合框自动填充文本框答案

【问题标题】：autopopulating text boxes from combo boxes从组合框自动填充文本框
【发布时间】：2014-11-24 20:17:41
【问题描述】：

我创建了一个表单来输入新的工作订单访问。我希望表单中的文本框从组合框中的选择中填充。

组合框列出了设备的序列号，一旦选择了序列号，我希望填充 CompanyName、PurchDate、LastMaintenanceDate 和 ModelNo。

我看到了一个 dlookup 的例子，并在公司名称文本框上尝试了这个表达式：

=DLookUp("[CompanyName]","SerialNoInfo","[SerialNoInfo].SerialNo= " & Str([Combo341].[Text]))

根据我的操作，我在框中不断收到错误 #Type 或 #Error。当我尝试为更新事件构建代码时，根本没有任何反应。我不知道我做错了什么。

【问题讨论】：

您的搜索字段是文本还是数字？如果是文本，则需要分隔符。即 =DLookUp("[CompanyName]","SerialNoInfo","[SerialNoInfo].SerialNo= '" & Str([Combo341].[Text] & "'"))

【解决方案1】：

您也可以使用：

Private Sub COMBOBOX_Change()

me.TEXTBOXNAME.Text = me.COMBOBOX.Column(X)

End Sub

其中 TEXTBOXNAME 是您要填充的文本框其中 COMBOBOX 是您要从中获取数据的组合框 X 是数据的列数（从 0 开始）

【讨论】：