Interaction.InputBox 方法

發行項
08/20/2007

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

命名空間： Microsoft.VisualBasic
組件： Microsoft.VisualBasic (在 microsoft.visualbasic.dll 中)

語法

'宣告
Public Shared Function InputBox ( _
    Prompt As String, _
    <OptionalAttribute> Optional Title As String = "", _
    <OptionalAttribute> Optional DefaultResponse As String = "", _
    <OptionalAttribute> Optional XPos As Integer = -1, _
    <OptionalAttribute> Optional YPos As Integer = -1 _
) As String
'用途
Dim Prompt As String
Dim Title As String
Dim DefaultResponse As String
Dim XPos As Integer
Dim YPos As Integer
Dim returnValue As String

returnValue = Interaction.InputBox(Prompt, Title, DefaultResponse, XPos, YPos)

public static string InputBox (
    string Prompt,
    [OptionalAttribute] string Title,
    [OptionalAttribute] string DefaultResponse,
    [OptionalAttribute] int XPos,
    [OptionalAttribute] int YPos
)

public:
static String^ InputBox (
    String^ Prompt, 
    [OptionalAttribute] String^ Title, 
    [OptionalAttribute] String^ DefaultResponse, 
    [OptionalAttribute] int XPos, 
    [OptionalAttribute] int YPos
)

public static String InputBox (
    String Prompt, 
    /** @attribute OptionalAttribute() */ String Title, 
    /** @attribute OptionalAttribute() */ String DefaultResponse, 
    /** @attribute OptionalAttribute() */ int XPos, 
    /** @attribute OptionalAttribute() */ int YPos
)

public static function InputBox (
    Prompt : String, 
    Title : String, 
    DefaultResponse : String, 
    XPos : int, 
    YPos : int
) : String

參數

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

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

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

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

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

傳回值

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

備註

如需詳細資訊，請參閱 Visual Basic 的主題 InputBox 函式 (Visual Basic)。

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

若要指定第一個引數之外的引數，則必須在運算式中使用 InputBox 函式。如果您省略任何位置引數，則必須保留對應的逗號分隔符號。

注意事項
InputBox 函式在 SafeTopLevelWindows 層級需要 UIPermission，而這可能會在部分信任的情況下影響其執行。如需詳細資訊，請參閱要求使用權限和 UIPermission 類別。

範例

此範例將示範使用 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

平台

Windows 98、 Windows 2000 SP4、 Windows CE、 Windows Millennium Edition、 Windows Mobile for Pocket PC、 Windows Mobile for Smartphone、 Windows Server 2003、 Windows XP Media Center Edition、 Windows XP Professional x64 Edition、 Windows XP SP2、 Windows XP Starter Edition

.NET Framework 並不支援各種平台的所有版本。如需支援平台版本的相關資訊，請參閱系統需求一節的內容。

共用方式為

Interaction.InputBox 方法

語法

參數

傳回值

備註

範例

平台

版本資訊

.NET Framework

.NET Compact Framework

請參閱

參考

其他資源

其他資源