我的组合框(基于查询)下降&显示选项,但我无法单击一个选项&留下来&填写其相关的文本框!我可以在下拉列表中突出显示客户,但它不会让我"选择"一个 - 所有功能都完全停止。我可以滚动表格底部的所有350个记录,但显然不是用户友好的。
好的,因此,要完全回答此问题,我需要了解组合框的其他一些设置。您能告诉我Column count
和Column widths
吗?您说组合框基于查询(因此此查询是Rowsource
),而Bound column
是第1列;查询中显示的第一列是什么?它是数字ID还是客户名称?
要使组合框"未结合",您可以清除Control source
属性。如果您想能够编辑该组合的字段,那么有几个选项,但这可能是一个单独的问题。现在,要在更改组合选择时显示正确记录的效果,您需要将代码添加到AfterUpdate
事件:
Dim rst As Recordset
Set rst = Me.RecordsetClone
rst.FindFirst **search criteria**
If Not rst.NoMatch Then
Me.Bookmark = rst.Bookmark
End If
Set rst = Nothing
取决于组合框基于的查询的第一列是数字还是文本,您需要用搜索标准
"CustomerID = " & combo1
或
"CustomerName = '" & combo1 & "'"
(但是带有您自己的列名和组合框名称)
艾伦·布朗(Allen Browne)在访问数据库上有很多有用的提示,请查看http://allenbrowne.com/ser-03.html,以便对此问题有更全面的答案。