inputbox

Visual Basic和VBS中的函數

InputBox是Visual BasicVBS中的一種函數,功能是彈出一個對話框,在其中顯示提示,等待用戶輸入文字並按下按鈕,然後返回用戶輸入的文字。

簡介


InputBox函數效果
InputBox函數效果
右圖就是InputBox函數的效果,其中展示了InputBox函數的三個重要參數Prompt、Title和Default的位置。該函數與MsgBox函數類似,區別就是InputBox函數用於簡單地接受用戶輸入的一些文本。

使用方法


語法

InputBox(Prompt,[Title],[Default],[XPos],[YPos],[Helpfile],[Context])

參數

InputBox函數參數
部分描述
Prompt必需的。作為對話框消息出現的字元串表達式。Prompt的最大長度大約為1024個字元,由所用字元的寬度決定。如果Prompt的內容超過一行,則可以在每一行之間用回車符(Chr(13))、換行符Chr(10))或是回車與換行符的組合(Chr(13) & Chr(10),即vbCrLf)將各行分隔開來。
Title可選的。顯示對話框標題欄中的字元串表達式。如果省略,則把應用程序名放入標題欄中。
Default可選的。顯示文本框中的字元串表達式,在用戶輸入前作為預設值。如果省略,則文本框為空。
XPos可選的。數值表達式, 與YPos一起出現,指定對話框的左邊與屏幕左邊的水平距離。如果省略,則對話框會在水平方向居中。
YPos可選的。數值表達式, 與XPos一起出現,指定對話框的頂端與屏幕頂端的距離。如果省略,則對話框被放置在屏幕垂直方向距底端大約三分之一的位置。
Helpfile可選的。字元串表達式,識別用來向對話框提供上下文相關幫助的幫助文件。如果提供了Helpfile,則也必須提供Context。
Context可選的。數值表達式,由幫助文件的作者指定給適當的幫助主題的幫助上下文編號。如果提供了Context,則也必須提供Helpfile。

說明

如果同時提供了Helpfile與Context,用戶可以按F1來查看與Context相應的幫助主題。某些主應用程序(支持使用Visual Basic for Applications的應用程序),例如Microsoft Excel,會在對話框中自動添加一個幫助按鈕。如果用戶單擊確定或按下回車,則InputBox函數返迴文本框中的內容。如果用戶單擊取消,則此函數返回一個長度為零的字元串("")。
VB中,如果沒有同時提供XPos和YPos,不會提示語法錯誤,但單獨出現的XPos或YPos將被忽略,相當於省略了這兩個參數。但在VBS中,單獨出現的XPos或YPos會生效,但另一個沒有確定的參數將使用默認值。

代碼示例


程序的作用是用InputBox函數輸入2個數據之後,把他們連接起來,用MsgBox函數顯示。
Private Sub Command1_Click()
Dim a As String, b As String
a = InputBox("輸入第一個數據:")
b = InputBox("輸入第二個數據:")
MsgBox a & b
End Sub