MsgBox函數語言參考

來源:互聯網
上載者:User
參考|函數   描述
  在對話方塊中顯示訊息,等待使用者單擊按鈕,並返回一個值指示使用者單擊的按鈕。
  文法
  MsgBox(prompt[, buttons][, title][, helpfile, context])
  MsgBox 函數的文法有以下參數:

參數 描述
  prompt 作為訊息顯示在對話方塊中的字串運算式。prompt 的最大長度大約是 1024 個字元,這取決於所使用的字元的寬度。如果 prompt 中包含多個行,則可在各行之間用斷行符號符 (Chr(13))、分行符號 (Chr(10)) 或斷行符號分行符號的組合 (Chr(13) & Chr(10)) 分隔各行。
  buttons 數值運算式,是表示指定顯示按鈕的數目和類型、使用的表徵圖樣式,預設按鈕的標識以及訊息框樣式的數值的總和。有關數值,請參閱“設定”部分。如果省略,則 buttons 的預設值為 0。
  title 顯示在對話方塊標題列中的字串運算式。如果省略 title,則將應用程式的名稱顯示在標題列中。
  helpfile 字串運算式,用於標識為對話方塊提供即時線上說明的協助檔案。如果已提供 helpfile,則必須提供 context。在 16 位系統平台上不可用。
  context 數值運算式,用於標識由協助檔案的作者指定給某個說明主題的上下文編號。如果已提供 context,則必須提供 helpfile。在 16 位系統平台上不可用。

設定
  buttons 參數可以有以下值:
  常數 值 描述
  vbOKOnly 0 只顯示確定按鈕。
  vbOKCancel 1 顯示確定和取消按鈕。
  vbAbortRetryIgnore 2 顯示放棄、重試和忽略按鈕。
  vbYesNoCancel 3 顯示是、否和取消按鈕。
  vbYesNo 4 顯示是和否按鈕。
  vbRetryCancel 5 顯示重試和取消按鈕。
  vbCritical 16 顯示臨界資訊表徵圖。
  vbQuestion 32 顯示警告查詢表徵圖。
  vbExclamation 48 顯示警告訊息表徵圖。
  vbInformation 64 顯示資訊訊息表徵圖。
  vbDefaultButton1 0 第一個按鈕為預設按鈕。
  vbDefaultButton2 256 第二個按鈕為預設按鈕。
  vbDefaultButton3 512 第三個按鈕為預設按鈕。
  vbDefaultButton4 768 第四個按鈕為預設按鈕。
  vbApplicationModal 0 應用程式模式:使用者必須響應訊息框才能繼續在當前應用程式中工作。
  vbsystemModal 4096 系統模式:在使用者響應訊息框前,所有應用程式都被掛起。

第一組值 (0 - 5) 用於描述對話方塊中顯示的按鈕類型與數目;第二組值 (16, 32, 48, 64) 用於描述表徵圖的樣式;第三組值 (0, 256, 512) 用於確定預設按鈕;而第四組值 (0, 4096) 則決定訊息框的樣式。在將這些數字相加以產生 buttons 參數值時,只能從每組值中取用一個數字。

傳回值
  MsgBox 函數有以下傳回值:
  常數 值 按鈕
  vbOK 1 確定
  vbCancel 2 取消
  vbAbort 3 放棄
  vbRetry 4 重試
  vbIgnore 5 忽略
  vbYes 6 是
  vbNo 7 否

說明
  如果同時提供了 helpfile 和 context,則使用者可以按 F1 鍵以查看與上下文相對應的說明主題。
  如果對話方塊顯示取消按鈕,則按 ESC 鍵與單擊取消的效果相同。如果對話方塊包含協助按鈕,則有為對話方塊提供的即時線上說明。但是在單擊其他按鈕之前,不會返回任何值。

下面的樣本利用MsgBox 函數顯示一資訊框並且傳回值說明了按下的是那一個按鈕:

Dim MyVar
  MyVar = MsgBox ("Hello World!", 65, "MsgBox 例子") ' MyVar 包含 either 1 or 2, '依賴於被按下的按鈕。

相關文章

Cloud Intelligence Leading the Digital Future

Alibaba Cloud ACtivate Online Conference, Nov. 20th & 21st, 2019 (UTC+08)

Register Now >

Starter Package

SSD Cloud server and data transfer for only $2.50 a month

Get Started >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。