メニュー

IF文
FOR文
Usingステートメント

ArrayListを利用
IEnumerableを実装
Dictionaryを利用
StringDictionaryを利用
Stack(スタック)
Queue(キュー)
Generic List

小文字⇔大文字の変換
文字列をある文字列で分割

日付関係
現在日付と時刻の取得
明日、来月の日付の取得
月末の日付の取得
日付チェック

ファイル関係
ファイル選択ダイアログ
ファイル読み込み
CSVファイル読み込み
XmlSerializerを利用
GZip圧縮
ファイル情報の取得
フォルダ配下のファイル情報取得

MySQLに接続
ADO.NetでSQLServerに接続

スレッドを作成
ManagementObjectSearcherを利用

ドライブ情報を取得

フォーム関係
チェックボックス
メニューバーの作成
DataGridViewのDataSourceに配置
Timerコントロール
タスクバーにアイコンを表示
プログレスバーを表示
閉じるボタンの処理
透過度の変更
ListBoxにドラック&ドロップ
WebBrowserコントロール
コントロールをマウスで移動
MDIアプリケーション
フォームに線を引く

WebAPI
Webリクエスト送信
Google Geocoding APIを呼び出す
Google Static Maps APIを呼び出す


正規表現
「^」について
「$」について
「+」について
「*」について
「.」について
「|」について
「{n}」について
「{n,m}」について
「[]」について

トップ
E-Mail
xml

ASP.Netのお勉強
ASP.Netで掲示板を作成しよう
Excel マクロ・VBAのお勉強
PHPのお勉強
AJAXのお勉強
Webデザインのお勉強
Javaのお勉強
連想書籍検索
世界の観光地検索
路線図
総合サイトCocoaLiz
ネイルサロン検索
エステサロン検索
アロマサロン検索
アイビューティーサロン検索

チェックボックス(CheckBox)@VB.Net

フォームにチェックボックスを配置します。
チェックボックスは、なものです。

普通に配置しても面白くないので、
チェックボックスを利用して、ストップウォッチを作成します。

フォームに、CheckBox、TextBox、Timerを配置します。
フォームロード時に、各種設定を行います。
カウンター値をTextBoxに表示し、Timerをスタートします。

チェックボックスにチェックされた時をHandleして、
スタートもしくはストップ処理を記述します。

Checkedでチェックされているのかを判断して、
チェックされていたら、Timerをスタートします。
チェックされていない場合は、Timerをストップします。

チェックボックスを利用したトグル処理ですね。


Public Class Form1

    Private count As Integer = 0

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        count = 1

        Me.TextBox1.Text = CStr(count)

        Me.CheckBox1.Text = "スタート"
        Me.CheckBox1.Checked = True

        Me.Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        count += 1
        Me.TextBox1.Text = CStr(count)
    End Sub

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If Me.CheckBox1.Checked Then
            Me.CheckBox1.Text = "スタート"
            Me.Timer1.Start()
        Else
            Me.CheckBox1.Text = "ストップ"
            Me.Timer1.Stop()
        End If
    End Sub
End Class




Copyright (C) 2008-2011 VB.Netのお勉強. All Rights Reserved.