MsgBox函數
首頁 基礎 操作 敘述 控制項 函數 程式設計 影像處理 Q & A

向上
MsgBox入門
MsgBox進階
MsgBox範例

MsgBox 函數  解說:入門 進階
MsgBox 函式 http://msdn2.microsoft.com/zh-tw/library/139z2azd(VS.80).aspx

範例

將訊息顯示在對話方塊中,等使用者按下按鈕,並傳回一 Integer 來指示使用者按下的是那一個鈕。

語法

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

MsgBox 函數的語法具有以下幾個指名引數

單元 說明
prompt 必要引數。做為顯示在對話方塊中之訊息的字串運算式prompt 的最大長度大約是 1024 個字元,由使用字元的寬度決定。如果 prompt 超過一行,您可以在每一行之間用復位字元(Chr(13))、換行字元 (Chr(10)) 或是復位字元與換行字元的組合 (Chr(13) & Chr(10)) 來做區隔
buttons 選擇性引數。數值運算式,用來指出顯示按鈕的數目及形式,使用的圖示樣式,預設按鈕為何,以及訊息方塊的強制回應等。如果沒有指定,則 buttons 的預設值是  0。
title 選擇性引數。顯示在對話方塊標題列中的字串運算式。如果沒有 title,則將應用程式的名稱放在標題列中。

設定

buttons 引數的設定有以下幾個:

常數 說明
MsgBoxStyle.OKOnly 0 只顯示「確定」按鈕。
MsgBoxStyle.OKCancel 1 顯示「確定」及 「取消」按鈕。
MsgBoxStyle.AbortRetryIgnore 2 顯示 「中止」 「重試」及 「略過」按鈕。
MsgBoxStyle.YesNoCancel 3 顯示 「是」、「否」及 「取消」按鈕。
MsgBoxStyle.YesNo 4 顯示 「是」及 「否」按鈕。
MsgBoxStyle.RetryCancel 5 顯示 「重試」及 「取消」按鈕。
MsgBoxStyle.Critical 16 顯示 Critical Message 圖示
MsgBoxStyle.Question 32 顯示 Warning Query 圖示
MsgBoxStyle.Exclamation 48 顯示 Warning Message 圖示
MsgBoxStyle.Information 64 顯示 Information Message 圖示
MsgBoxStyle.DefaultButton1 0 第一個按鈕是預設值。
MsgBoxStyle.DefaultButton2 256 第二個按鈕 是預設值。
MsgBoxStyle.DefaultButton3 512 第三個按鈕是預設值。
MsgBoxStyle.ApplicationModal 0 應用程式強制回應:使用者必須先回應此訊息方塊,才能在目前的應用程式中繼續工作。
MsgBoxStyle.SystemModal 4096 系統強制回應;所有的應用程式都會暫停,直到使用者回應此訊息方塊。
MsgBoxStyle.MsgBoxHelp 16384 將 Help按鈕新增到訊息方塊中。
MsgBoxStyle.MsgBoxSetForeground 65536 指定訊息方塊視窗作為前景視窗。
MsgBoxStyle.MsgBoxRight 524288 文字為靠右對齊。
MsgBoxStyle.MsgBoxRtlReading 1048576 指定文字應為在希伯來和阿拉伯語系統中的從右到左顯示。

第一組值 (0-5) 用來決定對話方塊中按鈕的形式與數目;第二組 (16, 32, 48, 64) 用來決定圖示的樣式;第三組 (0, 256, 512) 決定出那一個按鈕是預設值;而第四組 (0, 4096) 則決定訊息方塊的強制回應性。將這些數字相加以產生 buttons 引數值的時候,您只能由每組取用一個數字。

附註 這些常數都是 Visual Basic 所指定的。您可以在程式碼中的任何位置使用這些常數名稱,而不必指定實際的數值。

傳回值(MsgBoxResult)

常數 描述
vbOK 1 OK
vbCancel 2 Cancel
vbAbort 3 Abort
vbRetry 4 Retry
vbIgnore 5 Ignore
vbYes 6 Yes
vbNo 7 No

請注意

如果對話方塊有顯示 Cancel 按鈕,則按下 ESC 鍵與按下 Cancel 按鈕效果相同。如果對話方塊中有 Help 按鈕,則對話方塊中提供有文字感應說明。無論如何,在其他按鈕中的一個被按下前,不會傳回任何值。

附註 若要指定第一指名引數以外的引數,您必須在運算式中使用 MsgBox。若要忽略某些引數,您必須加入對應的逗號做為間隔。

相關網頁:

◎李明山 如意網站 VB教學網◎