ms-access - 如果隐藏了绑定(bind)列，则在组合框中选择一行会失败

Question

使用 Access 2010 我的表单上有一个未绑定(bind)的组合，它看起来像这样......

RowSource: SELECT EventID, DocRef FROM Events
BoundColumn: 1 
ColumnCount: 2
ColumnWidths: 0cm;2cm

在 vba 中设置组合值 (MyCombo="23") 仅在绑定(bind)列可见时才有效。当我设置 columnWidth="0cm;2cm"时，作业不再有效。

Sub Form_Open()
   evt = Me.OpenArgs
   If evt > "" Then
      MyCombo = evt
      ' MyCombo.Value = evt
      Call MyCombo_AfterUpdate
   End If
End Sub

如何在不显示 eventID 的情况下选择组合行？

Answer 1

我避免在 Form Open 中处理控件。从 Form Load 试试这个。

Private Sub Form_Load()
    If Not IsNull(Me.OpenArgs) Then
        Me.MyCombo = Me.OpenArgs
        Call MyCombo_AfterUpdate
        'Call DoSomething
    End If
End Sub

绑定(bind)列的宽度可以为 0，这应该仍然有效。

请注意，如果您的表单已经打开并在您执行此类操作时在组合中选择了一个值...

DoCmd.OpenForm "frmJaybob", OpenArgs:= 4

...组合的值不会更改为 4。

您可能会发现 Call MyCombo_AfterUpdate 实际上并未对 Form Load 执行任何操作。如果是这样，将您的 MyCombo_AfterUpdate 代码移动到一个单独的过程，并从 MyCombo_AfterUpdate 和 Form Load 调用新过程。

Private Sub DoSomething()
    ' move your MyCombo_AfterUpdate code here
    MsgBox "DoSomething"
End Sub