訊息
MsgBox()函數可以顯示訊息視窗,提供使用者錯誤訊息或是非題的選擇。
例如:確認操作,函數的語法如下所示:
MsgBox(提示訊息, [樣式, 視窗標題])
MsgBox("Hello", vbOK, "測試")
常數 | 值 |
OK | 1 |
Cancel | 2 |
Abort | 3 |
Retry | 4 |
Ignore | 5 |
Yes | 6 |
No | 7 |
MsgBoxStyle 列舉值
成員 | 值 | 說明 |
OKOnly | 0 | 僅顯示 [確定] 按鈕。 |
OKCancel | 1 | 顯示 [確定] 和 [取消] 按鈕。 |
AbortRetryIgnore | 2 | 顯示 [中止]、[重試] 和 [忽略] 按鈕。 |
YesNoCancel | 3 | 顯示 [是]、[否] 和 [取消] 按鈕。 |
YesNo | 4 | 顯示 [是] 和 [否] 按鈕。 |
RetryCancel | 5 | 顯示 [重試] 和 [取消] 按鈕。 |
Critical | 16 | 顯示 [重大訊息] 圖示。 |
Question | 32 | 顯示 [警告查詢] 圖示。 |
Exclamation | 48 | 顯示 [警告訊息] 圖示。 |
Information | 64 | 顯示 [資訊訊息] 圖示。 |
DefaultButton1 | 0 | 第一個按鈕為預設值。 |
DefaultButton2 | 256 | 第二個按鈕為預設值。 |
DefaultButton3 | 512 | 第三個按鈕為預設值。 |
ApplicationModal | 0 | 應用程式是強制回應的。 使用者必須在繼續使用目前應用程式之前先回應訊息方塊。 |
SystemModal | 4096 | 系統是強制回應的。 所有的應用程式都會暫止,直到使用者對訊息方塊做出回應時為止。 |
MsgBoxSetForeground | 65536 | 將訊息方塊視窗指定為前景視窗。 |
MsgBoxRight | 524288 | 文字靠右對齊。 |
MsgBoxRtlReading | 1048576 | 指定在希伯來文或阿拉伯文的系統上,文字應該以從右到左的書寫方式呈現。 |
對話方塊
InputBox對話方塊不同於MsgBox訊息視窗是一種「是非」選擇,它可以彈出對話方塊,讓使用者輸入資料,在功能上如同單行文字方塊控制項。
InputBox()函數的語法如下所示:
InputBox(提示訊息, [標題文字, 預設值, 位置x, 位置y])
1: Dim strName As String2: strName = InputBox("請輸入姓名?", "輸入")
