带有不可选择组合框的 access2010 表单

Posted 2023-05-07

【中文标题】带有不可选择组合框的 access2010 表单

【英文标题】：access2010 form with a non selectable combo box

【发布时间】：2015-08-19 16:55:39

【问题描述】：

我有一个带有组合框的 access 2010 表单。当我运行 Ado 查询时，下拉列表显示，但是当我尝试选择任何内容时，屏幕底部的消息显示为“只读”。

【问题讨论】：

Set rs = New ADODB.Recordset With rs Set .ActiveConnection = cn .Source = "select distinct assignmentto from pc3claims where assignmentto is not null order by AssignedTo" .LockType = adLockOptimistic .CursorType = adOpenKeyset '必须使用 aduseclient 有一个可绑定的记录集。 .CursorLocation = adUseClient .Open End With Set Me.Recordset = rs 'Me.RecordSource = rs.Source Set cboAssociate.Recordset = Me.Recordset cboAssociate.ControlSource = AssignedTo Set rs = Nothing Set cn = Nothing

【参考方案1】：

我认为问题在于您对表单和组合框使用相同的记录集。

您可以只使用 sql 语句使用 Row Source 属性填充组合框，并将 Bound Column 设置为 1。

cboAssociate.RowSource =  "Select distinct assignedto from pc3claims where assignedto is not null order by AssignedTo" 
cboAssociate.BoundColumn = 1

这将使用 AssignedTo 值填充您的组合，然后您可以将 Control Source 设置为表单记录集中的 AssignedTo 字段。