ボタンをクリックした時にコードを実行する


ボタンをクリックした時にコードを実行するには、まずフォームにボタンを貼り付けて、そのボタンをダブルクリックします。そうすると以下のようなコードが追加・表示されます。

Private Sub Command1_Click()

End Sub

Command1_Click()というのは、Command1というボタンがクリックされた時のことを表します。
この間にコードを書くことで、ボタンをクリックした時に実行することができます。例えば、文字を表示するで紹介した以下のコードを入力してみてください。ただし、Label1、Label2という名前の2つのラベルを貼り付けてください。

Dim str As String '文字列型の変数

str = "テスト"

Label1.Caption = str   'Label1に[テスト]と表示される
Label2.Caption = "str" 'Label2に[str]と表示される

Label1に[テスト]、Label2に[str]と表示されたら成功です。


戻る