VB.NET, C#, PowerShell Tipsサイト

Private Sub CheckBox1_CheckStateChanged(ByVal sender As Object, ByVal e As System.EventArgs) _
    Handles CheckBox1.CheckStateChanged

    'チェック状態の確認
    Select Case DirectCast(sender, CheckBox).CheckState
        Case CheckState.Checked
            MessageBox.Show("チェック状態に変更されました")
        Case CheckState.Indeterminate
            MessageBox.Show("中間の状態に変更されました")
        Case CheckState.Unchecked
            MessageBox.Show("未チェック状態に変更されました")
    End Select
End Sub