不使用无限循环管理`checkbox_check`事件

Question

我知道这似乎是一个容易的解决办法，但我有麻烦了。我有一个复选框，选中该复选框后，我将删除Windows窗体上DataGridView的数据源，并删除一些TextBox的ReadOnly属性。

Private Sub chkManual_MouseClick(sender As Object, e As EventArgs) Handles chkManual.MouseClick

        If Not Me.chkManual.Checked Then
        Me.chkManual.Checked = False
        Me.cbRegion.SelectedIndex = -1

        Me.txtIssueDate.ReadOnly = True
        Me.txtCasenum.ReadOnly = True
        Me.txtCommnum.ReadOnly = True

        Exit Sub

   Else
        Me.dgDataEntry.DataSource = Nothing
        Me.cbRegion.SelectedIndex = -1

        Me.txtIssueDate.ReadOnly = False
        Me.txtCasenum.ReadOnly = False
        Me.txtCommnum.ReadOnly = False
        ClearForm()

        frmPDF.Hide()
        Exit Sub
    End If
    End Sub

我已经调查过这些：

CheckBox_Checked事件

有没有更简单的方法来处理复选框？

最终代码（非常简单）：

Private Sub chkManual_CheckedChanged(sender As Object, e As EventArgs) Handles chkManual.CheckedChanged
    If Me.chkManual.Checked Then
        Me.dgDataEntry.DataSource = Nothing
        Me.cbRegion.SelectedIndex = -1

        Me.txtIssueDate.ReadOnly = False
        Me.txtCasenum.ReadOnly = False
        Me.txtCommnum.ReadOnly = False

        ClearForm()
        frmPDF.Hide()
    Else
        Me.cbRegion.SelectedIndex = -1

        Me.txtIssueDate.ReadOnly = True
        Me.txtCasenum.ReadOnly = True
        Me.txtCommnum.ReadOnly = True
    End If
End Sub

Answer 1

是否可以移除更改复选框状态的代码？例如：

Me.chkManual.Checked = False

该框将选中或取消选中，而无需您的代码执行，并且事件只抛出一次。