Question

嘿，我有一个复选框，我希望链接到的文本框如果未单击复选框，则会变为灰色。我在复选框上的单击事件下有代码，如果第一次单击该框，则此方法有效.....它允许文本框启用。但我想要它，如果使用意外点击复选框，他们可以点击复选框，文本框再次变回灰色。我不确定我是否在复选框的错误事件上有代码。感谢。

Private Sub FlightScheduleAffected_Click()
If IsNull(Me.FlightScheduleAffected.Value) Then
Me.TimeMOCCNotified.Enabled = False
Else
Me.TimeMOCCNotified.Enabled = True
End If
End Sub

Answer 1

复选框的值应该为true或false，它永远不会为null。您希望if语句读取

If Me.FlightScheduleAffected.Value Then
    Me.TimeMOCCNotified.Enabled = True
Else
    Me.TimeMOCCNotified.Enabled = False
End If

使文本框变灰

1 个答案: