VBA - 訊息框

MsgBox 函式顯示一個訊息框，並等待使用者點選按鈕，然後根據使用者點選的按鈕執行操作。

語法

MsgBox(prompt[,buttons][,title][,helpfile,context])

引數說明

Prompt − 必需引數。在對話方塊中顯示為訊息的字串。提示的最大長度約為 1024 個字元。如果訊息超過一行，則可以使用回車符 (Chr(13)) 或換行符 (Chr(10)) 在各行之間分隔。
Buttons − 可選引數。一個數值表示式，用於指定要顯示的按鈕型別、要使用的圖示樣式、預設按鈕的標識以及訊息框的模態性。如果留空，則按鈕的預設值為 0。
Title − 可選引數。在對話方塊標題欄中顯示的字串表示式。如果標題留空，則應用程式名稱將放置在標題欄中。
Helpfile − 可選引數。一個字串表示式，用於標識用於為對話方塊提供上下文相關幫助的幫助檔案。
Context − 可選引數。一個數值表示式，標識幫助作者分配給相應幫助主題的幫助上下文編號。如果提供了 context，則也必須提供 helpfile。

Buttons 引數可以取以下任何值：

0 vbOKOnly - 只顯示“確定”按鈕。
1 vbOKCancel - 顯示“確定”和“取消”按鈕。
2 vbAbortRetryIgnore - 顯示“中止”、“重試”和“忽略”按鈕。
3 vbYesNoCancel - 顯示“是”、“否”和“取消”按鈕。
4 vbYesNo - 顯示“是”和“否”按鈕。
5 vbRetryCancel - 顯示“重試”和“取消”按鈕。
16 vbCritical - 顯示嚴重錯誤圖示。
32 vbQuestion - 顯示警告查詢圖示。
48 vbExclamation - 顯示警告訊息圖示。
64 vbInformation - 顯示資訊訊息圖示。
0 vbDefaultButton1 - 第一個按鈕為預設按鈕。
256 vbDefaultButton2 - 第二個按鈕為預設按鈕。
512 vbDefaultButton3 - 第三個按鈕為預設按鈕。
768 vbDefaultButton4 - 第四個按鈕為預設按鈕。
0 vbApplicationModal 應用程式模態 - 在使用者響應訊息框之前，當前應用程式將無法工作。
4096 vbSystemModal 系統模態 - 在使用者響應訊息框之前，所有應用程式都將無法工作。

上述值在邏輯上分為四組：第一組 (0 到 5) 指示要在訊息框中顯示的按鈕。第二組 (16, 32, 48, 64) 描述要顯示的圖示的樣式，第三組 (0, 256, 512, 768) 指示哪個按鈕必須是預設按鈕，第四組 (0, 4096) 確定訊息框的模態性。

返回值

MsgBox 函式可以返回以下值之一，這些值可用於識別使用者在訊息框中單擊的按鈕。

1 - vbOK - 單擊了“確定”
2 - vbCancel - 單擊了“取消”
3 - vbAbort - 單擊了“中止”
4 - vbRetry - 單擊了“重試”
5 - vbIgnore - 單擊了“忽略”
6 - vbYes - 單擊了“是”
7 - vbNo - 單擊了“否”

示例

Function MessageBox_Demo() 
   'Message Box with just prompt message 
   MsgBox("Welcome")     
   
   'Message Box with title, yes no and cancel Butttons  
   int a = MsgBox("Do you like blue color?",3,"Choose options") 
   ' Assume that you press No Button  
   msgbox ("The Value of a is " & a) 
End Function

輸出

步驟 1 − 以上函式可以透過點選 VBA 視窗上的“執行”按鈕或從 Excel 工作表呼叫該函式來執行，如下面的螢幕截圖所示。

步驟 2 − 顯示一個簡單的訊息框，其中包含訊息“歡迎”和一個“確定”按鈕。

步驟 3 − 單擊“確定”後，將顯示另一個對話方塊，其中包含一條訊息以及“是”、“否”和“取消”按鈕。

步驟 4 − 單擊“否”按鈕後，該按鈕的值 (7) 將作為整數儲存，並作為訊息框顯示給使用者，如下面的螢幕截圖所示。使用此值，可以瞭解使用者單擊了哪個按鈕。

列印頁面