代码之家  ›  专栏  ›  技术社区  ›  kazzi

访问表单-如果选择了其他字段,则打开新字段

  •  0
  • kazzi  · 技术社区  · 6 年前

    我想知道如果选择了另一个先前的字段,是否可以显示或激活一个字段。

    例如,如果我有一个 Status 字段,然后选择 Inactive 那我想要另一个场地 Inactive Date

    谢谢

    1 回复  |  直到 6 年前
        1
  •  1
  •   Santosh    6 年前

    假设你有 checkbox 为了地位和 textbox 在你的表格上记录日期。
    AfterUpdate 控件值更改时触发事件,您可以在此启用/禁用其他控件。

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

    enter image description here


    使用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

    enter image description here