MessageBox.Showメソッド [VB.NET]

Visual Basic.NET ADO.NETデータベースプログラミング

引数により外観変更

MessageBox.Show メソッドは、引数の指定方法によって、メッセージボックスの外観を変更することが可能です。

MessageBox.Show(引数)

第1引数のみを指定した場合メッセージのみ表示
MessageBox.Show(message)

メッセージボックス1
  • タイトルバーにテキスト表示なし
  • [OK]ボタン表示
  • [OK]ボタンにフォーカス
' MessageBox.Showメソッドの第1引数設定
' メッセージボックスに表示するテキスト
Dim message As String = "Hello World"

MessageBox.Show(message)

第2引数はタイトルバーテキスト
MessageBox.Show(message, caption)

メッセージボックス2
  • タイトルバーにテキスト表示あり(第2引数で指定)
  • [OK]ボタン表示
  • [OK]ボタンにフォーカス
' メッセージボックスに表示するテキスト
Dim message As String = "Hello World"

' タイトルバーに表示するテキスト
Dim caption As String = "MessageBox.Showメソッド"

MessageBox.Show(message, caption)

第3引数はボタンの数とボタンテキスト
MessageBox.Show(message, caption, buttons)

第3引数
表示ボタン
MessageBoxButtons.AbortRetryIgnore [中止]、[再試行]、[無視]
MessageBoxButtons.OK [OK]
MessageBoxButtons.OKCancel [OK]と[キャンセル]
MessageBoxButtons.RetryCance [再試行]と[キャンセル]
MessageBoxButtons.YesNo [はい]と[いいえ]
MessageBoxButtons.YesNoCancel [はい]、[いいえ]、[キャンセル]
メッセージボックス3
  • タイトルバーにテキスト表示あり(第2引数で指定)
  • [OK]ボタンと[キャンセル]ボタンを表示(第3引数で指定)
  • [OK]ボタンにフォーカス
' メッセージボックスに表示するテキスト
Dim message As String = "Hello World"

' タイトルバーに表示するテキスト
Dim caption As String = "MessageBox.Showメソッド"

' 表示するボタン([OK]ボタンと[キャンセル]ボタン)
Dim buttons As MessageBoxButtons = MessageBoxButtons.OKCancel

MessageBox.Show(message, caption, buttons)

第4引数はアイコン種類と背景色
MessageBox.Show(message, caption, buttons, icon)

第4引数
アイコン形 背景色 表示内容
MessageBoxIcon.Asterisk
MessageBoxIcon.Error ×
MessageBoxIcon.Exclamation
MessageBoxIcon.Hand ×
MessageBoxIcon.Information
MessageBoxIcon.None 表示しない
MessageBoxIcon.Question
MessageBoxIcon.Stop ×
MessageBoxIcon.Warning
メッセージボックス4
  • タイトルバーにテキスト表示あり(第2引数で指定)
  • [OK]ボタンと[キャンセル]ボタンを表示(第3引数で指定)
  • iを丸く囲ったアイコンを表示(第4引数で指定)
  • [OK]ボタンにフォーカス
' メッセージボックスに表示するテキスト
Dim message As String = "Hello World"

' タイトルバーに表示するテキスト
Dim caption As String = "MessageBox.Showメソッド"

' 表示するボタン([OK]ボタンと[キャンセル]ボタン)
Dim buttons As MessageBoxButtons = MessageBoxButtons.OKCancel

' 表示するアイコン(円で囲まれた小文字の'i')
Dim icon As MessageBoxIcon = MessageBoxIcon.Information

MessageBox.Show(message, caption, buttons, icon)

第5引数はボタンのフォーカス指定
MessageBox.Show(message, caption, buttons, icon, defaultBtn)

第5引数
フォーカス位置
MessageBoxDefaultButton.Button1 第1ボタン
MessageBoxDefaultButton.Button2 第2ボタン
MessageBoxDefaultButton.Button3 第3ボタン
メッセージボックス5
  • タイトルバーにテキスト表示あり(第2引数で指定)
  • [OK]ボタンと[キャンセル]ボタンを表示(第3引数で指定)
  • iを丸く囲ったアイコンを表示(第4引数で指定)
  • [キャンセル]ボタンにフォーカスを変更(第5引数で指定)

' メッセージボックスに表示するテキスト
Dim message As String = "Hello World"

' タイトルバーに表示するテキスト
Dim caption As String = "MessageBox.Showメソッド"

' 表示するボタン([OK]ボタンと[キャンセル]ボタン)
Dim buttons As MessageBoxButtons = MessageBoxButtons.OKCancel

' 表示するアイコン(円で囲まれた小文字の'i')
Dim icon As MessageBoxIcon = MessageBoxIcon.Information

' フォーカスを設定するボタン(2番目のボタン)
Dim defaultBtn As MessageBoxDefaultButton _
    = MessageBoxDefaultButton.Button2

MessageBox.Show(message, caption, buttons, icon, defaultBtn)
[広告]と関連コンテンツ
[広告]