VBScript - 對話方塊

什麼是對話方塊？

VBScript 允許開發者有效地與使用者互動。它可以是一個顯示訊息給使用者的訊息框，也可以是一個使用者可以輸入值的輸入框。

VBScript MsgBox 函式

MsgBox 函式顯示一個訊息框，並等待使用者點選一個按鈕，然後根據使用者點選的按鈕執行操作。

語法

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

引數描述

提示 − 必需引數。在對話方塊中顯示為訊息的字串。提示的最大長度約為 1024 個字元。如果訊息超過一行，則可以使用回車符 (Chr(13)) 或換行符 (Chr(10)) 在各行之間分隔。
按鈕 − 可選引數。一個數字表達式，用於指定要顯示的按鈕型別、使用的圖示樣式、預設按鈕的標識以及訊息框的模態性。如果留空，按鈕的預設值為 0。
標題 − 可選引數。在對話方塊標題欄中顯示的字串表示式。如果標題留空，則應用程式名稱將放在標題欄中。
幫助檔案 − 可選引數。一個字串表示式，用於標識要用於為對話方塊提供上下文相關幫助的幫助檔案。
上下文 − 可選引數。一個數字表達式，用於標識幫助作者分配給相應幫助主題的幫助上下文編號。如果提供上下文，則也必須提供幫助檔案。

按鈕引數可以取以下任何值：

0 vbOKOnly 只顯示“確定”按鈕。
1 vbOKCancel 顯示“確定”和“取消”按鈕。
2 vbAbortRetryIgnore 顯示“中止”、“重試”和“忽略”按鈕。
3 vbYesNoCancel 顯示“是”、“否”和“取消”按鈕。
4 vbYesNo 顯示“是”和“否”按鈕。
5 vbRetryCancel 顯示“重試”和“取消”按鈕。
16 vbCritical 顯示嚴重錯誤訊息圖示。
32 vbQuestion 顯示警告查詢圖示。
48 vbExclamation 顯示警告訊息圖示。
64 vbInformation 顯示資訊訊息圖示。
0 vbDefaultButton1 第一個按鈕為預設按鈕。
256 vbDefaultButton2 第二個按鈕為預設按鈕。
512 vbDefaultButton3 第三個按鈕為預設按鈕。
768 vbDefaultButton4 第四個按鈕為預設按鈕。
0 vbApplicationModal 應用程式模態。在使用者響應訊息框之前，當前應用程式將無法工作。
4096 vbSystemModal 系統模態。在使用者響應訊息框之前，所有應用程式都將無法工作。

上述值在邏輯上分為四組：第一組 (0 到 5) 指示要在訊息框中顯示的按鈕；第二組 (16、32、48、64) 描述要顯示的圖示的樣式；第三組 (0、256、512、768) 指示哪個按鈕必須是預設按鈕；第四組 (0、4096) 確定訊息框的模態性。

返回值

MsgBox 函式可以返回以下值之一：

1 - vbOK - 點選了“確定”
2 - vbCancel - 點選了“取消”
3 - vbAbort - 點選了“中止”
4 - vbRetry - 點選了“重試”
5 - vbIgnore - 點選了“忽略”
6 - vbYes - 點選了“是”
7 - vbNo - 點選了“否”

示例

<!DOCTYPE html>
<html>
   <body>
      <script language = "vbscript" type = "text/vbscript">
         'Message Box with just prompt message
         MsgBox("Welcome")    
           
         'Message Box with title, yes no and cancel Butttons 
         a = MsgBox("Do you like blue color?",3,"Choose options")
         ' Assume that you press No Button	
         document.write("The Value of a is " & a)
         
      </script>
   </body>
</html>

執行上述指令碼時，將顯示訊息框，如果按下“否”按鈕，則 a 的值為 7。

The Value of a is 7

VBScript InputBox 函式

InputBox 函式幫助使用者從使用者那裡獲取值。輸入值後，如果使用者點選“確定”按鈕或按鍵盤上的 ENTER 鍵，InputBox 函式將返回文字框中的文字。如果使用者點選“取消”按鈕，則該函式將返回空字串 ("")。

語法

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

引數描述

提示 − 必需引數。在對話方塊中顯示為訊息的字串。提示的最大長度約為 1024 個字元。如果訊息超過一行，則可以使用回車符 (Chr(13)) 或換行符 (Chr(10)) 在各行之間分隔。
標題 − 可選引數。在對話方塊標題欄中顯示的字串表示式。如果標題留空，則應用程式名稱將放在標題欄中。
預設值 − 可選引數。使用者希望顯示在文字框中的預設文字。
XPos − 可選引數。X 軸的位置，表示提示距離螢幕左側的水平距離。如果留空，則輸入框水平居中。
YPos − 可選引數。Y 軸的位置，表示提示距離螢幕左側的垂直距離。如果留空，則輸入框垂直居中。
幫助檔案 − 可選引數。一個字串表示式，用於標識要用於為對話方塊提供上下文相關幫助的幫助檔案。
上下文 − 可選引數。一個數字表達式，用於標識幫助作者分配給相應幫助主題的幫助上下文編號。如果提供上下文，則也必須提供幫助檔案。

示例

<!DOCTYPE html>
<html>
   <body>
      <script language = "vbscript" type = "text/vbscript">
         ' Input Box with only Prompt
         InputBox("Enter a number")    
        
         ' Input Box with a Title
         a = InputBox("Enter a Number","Enter Value")
         msgbox a
        
         ' Input Box with a Prompt,Title and Default value
         a = InputBox("Enter a Number","Enter Value",123)
         msgbox a
        
         ' Input Box with a Prompt,Title,Default and XPos
         a = InputBox("Enter your name","Enter Value",123,700)
         msgbox a
        
         ' Input Box with a Prompt,Title and Default and YPos
         a = InputBox("Enter your name","Enter Value",123,,500)
         msgbox a
         
      </script>
   </body>
</html>

執行上述指令碼時，將顯示輸入框，並顯示使用者輸入的值。

列印頁面