共用方式為


Interaction.InputBox(String, String, String, Int32, Int32) 方法

定義

在對話方塊中顯示提示、等候使用者輸入文字或按一下按鈕,然後傳回包含文字方塊內容的字串。

public static string InputBox (string Prompt, string Title = "", string DefaultResponse = "", int XPos = -1, int YPos = -1);
static member InputBox : string * string * string * int * int -> string
Public Function InputBox (Prompt As String, Optional Title As String = "", Optional DefaultResponse As String = "", Optional XPos As Integer = -1, Optional YPos As Integer = -1) As String

參數

Prompt
String

必要項。String 運算式,顯示為對話方塊中的訊息。 Prompt 長度的最大值大約為 1024 個字元,需視使用的字元寬度而定。 如果 Prompt 包含一行以上,您可以使用歸位字元分隔行 (Chr(13)) 、換行字元 (Chr(10)) ,或換行字元組合 (Chr(13) & Chr(10 行之間的 10)) 。

Title
String

選擇性。 String 運算式,會顯示在對話方塊的標題列中。 如果您省略 Title,則會將應用程式名稱置於標題列中。

DefaultResponse
String

選擇性。 String 運算式,會在未提供其他輸入時,顯示在文字方塊中當做預設回應。 如果您省略 DefaultResponse,則顯示的文字方塊會是空的。

XPos
Int32

選擇性。 數值運算式,可指定從螢幕左邊緣算起的對話方塊左邊緣的距離 (以 Twip 為單位)。 如果您省略 XPos,則會以水平置中方式顯示對話方塊。

YPos
Int32

選擇性。 數值運算式,可指定從螢幕上邊緣算起的對話方塊上邊緣的距離 (以 Twip 為單位)。 如果您省略 YPos,則會以垂直顯示方式將對話方塊置於往螢幕下方距離約三分之一的地方。

傳回

在對話方塊中顯示提示、等候使用者輸入文字或按一下按鈕,然後傳回包含文字方塊內容的字串。

範例

此範例顯示使用 InputBox 函式來提示使用者輸入值的各種方式。 如果省略 x 和 y 位置,則對話框會自動置中給個別座標軸。 如果使用者按兩下 [確定] 或按 ENTER 鍵,變數 MyValue 就會包含使用者輸入的值。

Dim message, title, defaultValue As String
Dim myValue As Object
' Set prompt.
message = "Enter a value between 1 and 3"
' Set title.
title = "InputBox Demo"
defaultValue = "1"   ' Set default value.

' Display message, title, and default value.
myValue = InputBox(message, title, defaultValue)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue

' Display dialog box at position 100, 100.
myValue = InputBox(message, title, defaultValue, 100, 100)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue

備註

如果使用者按兩下 [ 取消],則會傳回長度為零的字串。

若要指定超過第一個自變數,您必須在表達式中使用 函 InputBox 式。 如果您省略任何位置自變數,則必須保留對應的逗號分隔符。

注意

InputBox式需要UIPermissionSafeTopLevelWindows層級,這可能會在部分信任的情況下影響其執行。 如需詳細資訊,請參閱 要求權限UIPermission

適用於

另請參閱