VBでタイマーコントロールを使用する方法
VBでTimerコントロールを使用するのはとても簡単で、以下の手順に従うだけです。
- VBのフォームデザイナーで「ツールボックス」ウィンドウを探し、ツールボックスでTimerコントロールを見つけます。
- タイマーコントロールをフォームにドラッグアンドドロップします。
- フォーム上でTimerコントロールをクリックし、プロパティウィンドウでTimerコントロールのプロパティを設定する(Interval: 時間間隔(ミリ秒) など)。
- フォームのコード画面でタイマーコントロールのイベント(例:Tickイベント)を検索します。
- Tick イベントでコードを書く。これは、一定間隔ごとに実行されるコードロジック。
Timerコントロールを用いて、フォーム上の時刻表示を1秒ごとに更新する簡単な例を次に示します。
- フォームにラベルコントロールをドラッグ&ドロップして時間を表示します。
- 以下のコードをフォームのコードウィンドウに記述します。
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 1000 ' 设置时间间隔为1秒
Timer1.Start() ' 启动计时器
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Label1.Text = DateTime.Now.ToString("HH:mm:ss") ' 更新时间显示
End Sub
- プログラムを実行すると、ウィンドウのLabelコントロールに現在の時刻が表示され、1秒ごとに更新されます。
この例では、フォームがロードされたときに Timer コントロールのプロパティを設定し、Tick イベントで Label コントロールの表示を更新しています。Timer コントロールは、指定された間隔で Tick イベントを発生させて、コードロジックを実行します。