ToolStripButton.CheckOnClick 屬性

定義

命名空間:

System.Windows.Forms

組件:

System.Windows.Forms.dll

取得或設定值，指出當按一下 ToolStripButton 時，它是否應該自動顯示為已按下和未按下。

public:
 property bool CheckOnClick { bool get(); void set(bool value); };

public bool CheckOnClick { get; set; }

member this.CheckOnClick : bool with get, set

Public Property CheckOnClick As Boolean

屬性值

Boolean

如果 ToolStripButton 應該在按一下時自動顯示為已按下和未按下，則為 true，否則為 false。 預設為 false。

範例

下列程式碼範例會將 CheckOnClick 屬性 true 設定為 ， Checked 並在按一下按鈕時，使用 事件中的 CheckedChanged 屬性，將按鈕文字的字型變更為粗體。

ToolStripButton^ boldButton;

void InitializeBoldButton()
{
    boldButton = gcnew ToolStripButton;
    boldButton->Text = "B";
    boldButton->CheckOnClick = true;
    boldButton->CheckedChanged  += gcnew EventHandler(this, 
        &Form1::boldButtonCheckedChanged);
    toolStrip1->Items->Add(boldButton);
}

void boldButtonCheckedChanged(Object^ sender, EventArgs^ e)
{
    if (boldButton->Checked)
    { 
        this->Font= gcnew System::Drawing::Font(this->Font, 
            FontStyle::Bold);
    }
    else
    { 
        this->Font = gcnew System::Drawing::Font(this->Font, 
            FontStyle::Regular);
    }
}


//   internal:

internal ToolStripButton boldButton;

private void InitializeBoldButton()
{
    boldButton = new ToolStripButton();
    boldButton.Text = "B";
    boldButton.CheckOnClick = true;
    toolStrip1.Items.Add(boldButton);
}

private void boldButton_CheckedChanged(object sender, EventArgs e)
{
    if (boldButton.Checked)
    {
        this.Font = new Font(this.Font, FontStyle.Bold);
    }
    else
    {
        this.Font = new Font(this.Font, FontStyle.Regular);
    }
}

Friend WithEvents boldButton As ToolStripButton

Private Sub InitializeBoldButton()
    boldButton = New ToolStripButton()
    boldButton.Text = "B"
    boldButton.CheckOnClick = True
    toolStrip1.Items.Add(boldButton)

End Sub

Private Sub boldButton_CheckedChanged(ByVal sender As [Object], _
    ByVal e As EventArgs) Handles boldButton.CheckedChanged
    If boldButton.Checked Then
        Me.Font = New Font(Me.Font, FontStyle.Bold)
    Else
        Me.Font = New Font(Me.Font, FontStyle.Regular)
    End If

End Sub