vba - 组合框上的 MS Access 强制更新

Question

当 ComboBox 值在代码中更改时，如何强制更新。下面是我尝试过但似乎不起作用的一段代码

 If (Not Mid(sCode, 1, 2) = ddlLevelID1) Then
     ddlLevelID1 = Mid(sCode, 1, 2) 'force change/force AFTER_UPDATE event to run. 
 End If 

Answer 1

假设ddlLevelID1是组合框：

ddlLevelID1.value = foo

会改变值。我不相信您可以将 ComboBox 中显示的值链接到变量值，而无需在更改值后将更改推送到用户窗体。

---

关于 AfterUpdate 方法，来自 msdn：

使用 Visual Basic 或包含 SetValue 操作的宏更改控件中的数据不会触发控件的这些事件。但是，如果您随后移动到另一条记录或保存该记录，则会发生窗体的 AfterUpdate 事件。

http://msdn.microsoft.com/en-us/library/office/bb238392(v=office.12).aspx