访问表格-如果选择了其他字段，则打开“新字段”

Question

我想知道如果选择了另一个先前的字段，是否有可能显示一个字段或将其激活。

例如，如果我有一个Status字段，然后选择Inactive，那么我想为Inactive Date显示另一个字段

谢谢

Answer 1

比方说，您有checkbox的身分，textbox可以捕捉表格上的日期。
当控件值更改时，将触发AfterUpdate事件，您可以在此处启用/禁用其他控件。

Private Sub chkStatus_AfterUpdate()
    If Me.chkStatus Then
        Me.txtDate.Enabled = True
    Else
        Me.txtDate.Enabled = False
    End If
End Sub

---

使用VBA启用/禁用下拉框更改文本框

Private Sub cmbStatus_Change()

    If Nz(Me.cmbStatus, "") = "Active" Then
         Me.txtDate.Enabled = True
    ElseIf Nz(Me.cmbStatus, "") = "InActive" Then
         Me.txtDate.Enabled = False
    End If
End Sub

---

使用宏生成器-不使用VBA