コントロールの追加（コマンドボタン）

最終更新日：2013-02-18

第3回.コントロールの追加（コマンドボタン）

何もないフォームでは何もできませんので、

とりあえず、部品を配置しましょう。

この部品をコントロールと呼びます。

使えるコントロールは、

Excelサンプル画像

このツールボックスにあるアイコンが使えるコントロールになります。

ここには、他のコントロールを追加する事もできますが、それは後々。

　これは、配置されているコントロールを選択する場合に使います。

マウスをアイコンの上に置くと、ポップアップのメッセージが表示されますので、

それぞれのアイコンの意味は分かるようになっています。

では、まずはコマンドボタンを配置してみましょう。

アイコンは、

これです。

これをクリックして、フォーム上でドラッグしてサイズを決定します。

Excelサンプル画像

こんな感じです。

このボタンは、フォームを閉じるボタンにします。

プロパティで、オブジェクト名とCaptionを変更しましょう。

オブジェクト名：btnCancel
Caption：閉じる

Excelサンプル画像

このように指定します。

すると、

Excelサンプル画像

このように、ボタンの名称も変更されます。

次は、このボタンをダブルクリックするか、

右クリックで、「コードの表示」

Excelサンプル画像

このように、そのボタンのイベントが自動で追加されます。

ただし、追加されるイベントは、コントロールの種類によって、

デフォルトのイベントが追加されますので、適宜変更が必要になる場合があります。

ボタンの場合は、Clickイベントが追加されます、まあ、ボタンならほとんどこれで良いですね。

では、このイベントを以下のように書き換えます。

Private Sub btnCancel_Click()
　　Unload Me
End Sub

これで、閉じるボタンの完成です。

Unload Meは、
Unload frmSample

のように、フォーム名を書いても良く、ネットでは良く見かけますが、

フォーム毎に、いちいち変更するのも面倒ですし、

ここは、Meとして自分自信を閉じると明示しておいた方が良いでしょう。

では、前回作った、

Private Sub btnCancel_Click()
　　Unload Me
End Sub

これを実行してみましょう。

Excelサンプル画像

「閉じる」をクリックして、フォームが閉じる事を確認して下さい。