从组合框自动填充文本框

Question

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

组合框列出了设备的序列号，一旦选择了序列号，我想要CompanyName，PurchDate，LastMaintenanceDate，＆amp; ModelNo to populate。

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

= DLookUp（＆＃34; [CompanyName]＆＃34;，＆＃34; SerialNoInfo＆＃34;，＆＃34; [SerialNoInfo] .SerialNo =＆＃34;＆amp; Str（[Combo341]。[文本））

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

Answer 1

您也可以使用：

Private Sub COMBOBOX_Change()

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

End Sub

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