close

訊息

MsgBox()函數可以顯示訊息視窗,提供使用者錯誤訊息或是非題的選擇。

例如:確認操作,函數的語法如下所示:

MsgBox(提示訊息, [樣式, 視窗標題])

image

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 String
  2: strName = InputBox("請輸入姓名?", "輸入")
image
arrow
arrow
    全站熱搜

    alyoou 發表在 痞客邦 留言(0) 人氣()