Access VBA中的Combobox问题

Question

我正在尝试将组合框的值设置为默认值，问题是数据源来自返回整数类型的查询，我希望我的默认值为“*”，当我尝试这个时：

Private Sub LabelWklstID_DblClick(Cancel As Integer)
Me.WorklistIDSelector.Value = Mid(Me.WorklistIDSelector.DefaultValue, 2, 1)
End Sub

它无法获得“无效值”错误，但是当我尝试使用它时，它可以工作：

Me.WorklistIDSelector.Value = 1

如何让我的组合框接受“*”。任何帮助将不胜感激

编辑：

• 行来源= SELECT tWorkList.WorkListID，tWorkList.ProjectID FROM tWorkList GROUP BY tWorkList.WorkListID，tWorkList.ProjectID HAVING（（（tWorkList.ProjectID）= [Forms]！[fMain]！[ProjectID]））ORDER BY tWorkList.WorkListID;
• 绑定列= 1
• 列宽= 2,54厘米

Answer 1

选择tworklistID作为ID，其他字段来自tworlklist等 联盟 选择'*'作为ID，0,0,0（虚拟空白其他字段）