メッセージの表示

広告

まずはメッセージを表示するためのダイアログについて見てみます。構文は下記のようになっています。

MsgBox 表示文字列, ボタンの種類, タイトル文字列

上記は単にメッセージを表示し、ボタンが1つだけある場合の構文です。

ダイアログに表示されているどのボタンを押したかなど、ダイアログからの結果を取得する場合には次のように記述します。

Dim ans As Integer
ans = MsgBox (表示文字列, ボタンの種類, タイトル文字列)

ダイアログでどのボタンが押されたかはInteger型の値とをして取得する事が出来ます。

ダイアログに表示する文字列、どのようなボタンを表示するかの指定、ダイアログのウィンドウタイトル、の3つを指定して作成します。ボタンの種類とタイトル文字列は省略可能で省略した場合はデフォルトの値が使われます。

サンプル

まずはどのようなものか理解するためにボタンが1つだけあるダイアログを作成してみます。

testdialog1.bas

Sub テスト()
    MsgBox "ダイアログテスト", vbOKOnly, "タイトル"
End Sub

上記のマクロを実行すると次のようになります。

ダイアログテスト

次のページで指定できるボタンの種類について確認していきます。

( Written by Tatsuo Ikura )