Lotus Symphony 1.2


MsgBox 函數 [執行時期]

顯示一個包含訊息的對話框,並傳回一個值。

語法:

MsgBox (Text As String[,Type As Integer[,Dialogtitle As String]])

回覆值:

Integer

參數:

Text:字串表示式,即在對話框中顯示的訊息。使用 Chr$(13) 可以插入換行符。

DialogTitle:對話框標題列中顯示的字串表示式。如果不指定此參數,則顯示個別應用程式名稱。

Type:任意整數表示式,用於指定對話框的類型,並定義所顯示的按鈕或圖示之數目和類型。Type 表示位元型樣的組合 (透過加入個別值來定義的對話框元素):

0 : 僅顯示「確定」按鈕。

1 : 顯示「確定」和「取消」按鈕。

2 : 顯示「取消」和「重試」按鈕。

3 : 顯示「是」、「否」和「取消」按鈕。

4 : 顯示「是」和「否」按鈕。

5 : 顯示「重試」和「取消」按鈕。

16 : 在對話框中加入停止圖示。

32 : 在對話框中加入問號圖示。

48 : 在對話框中加入感嘆號圖示。

64 : 在對話框中加入資訊圖示。

128 : 將對話框中的第一個按鈕作為預設按鈕。

256 : 將對話框中的第二個按鈕作為預設按鈕。

512 : 將對話框中的第三個按鈕作為預設按鈕。

回覆值:

1 : 確定

2 : 取消

4 : 重試

5 : 忽略

6 : 是

7 : 否

錯誤代碼

5 無效的程序呼叫

範例:

Sub ExampleMsgBox

Dim sVar as Integer

sVar = MsgBox ("Las Vegas")

sVar = MsgBox ("Las Vegas",1)

sVar = MsgBox ( "Las Vegas",256 + 16 + 2,"Dialog title")

end sub


其他文件 | 商標