Question

我使用复选框作为切换开关（ON-OFF按钮），使用Button属性将其外观更改为Checkbox.Appearance。当我运行VB.NET应用程序时，Checkbox仅在第一次单击后变为按钮。是否可以将Checkbox按钮的外观更改为默认值？当用户单击“开启”时，我还希望按钮弹出窗口。我尝试使用FlatStyle属性更改外观，但它不起作用。

我使用以下代码：

Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged

    CheckBox1.Appearance = System.Windows.Forms.Appearance.Button

    If CheckBox1.Checked = True Then
        CheckBox1.Text = "ON"
    ElseIf CheckBox1.Checked = False Then
        CheckBox1.Text = "OFF"
    End If 

End Sub

Answer 1

可以在表格

的Appearance事件中选择Load

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    Me.CheckBox1.Appearance = Appearance.Button
End Sub

将复选框外观更改为按钮

1 个答案: