DevExpress CheckButton 没有切换？

Question

我对 VB.net 有一定的了解，但截至昨天，我对 DevExpress 的体验只有 1 天。功能接缝很简单，但偶尔会弹出问题。

我的第一个问题是：

如何创建一个切换按钮，使用 DevExpress“检查按钮”控件打开或关闭计时器。当我第二次单击我的 Checkbutton 控件时，我当前使用的代码只会停止我的 timmer 而不会重新启动它？

     Private Sub CheckButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckButton1.CheckedChanged
        If True Then
            Timer1.Stop()
        Else
            Timer1.Start()
        End If
    End Sub

Answer 1

只需使用CheckButton.Checked 属性，如下所示：

Private Sub CheckButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckButton1.CheckedChanged
    If CheckButton1.Checked Then
        Timer1.Stop()
    Else
        Timer1.Start()
    End If
End Sub