Interaction.InputBox(String, String, String, Int32, Int32) 方法
定义
重要
一些信息与预发行产品相关，相应产品在发行之前可能会进行重大修改。 对于此处提供的信息，Microsoft 不作任何明示或暗示的担保。
在对话框中显示提示，等待用户输入文本或单击按钮，然后返回包含文本框内容的字符串。
public static string InputBox (string Prompt, string Title = "", string DefaultResponse = "", int XPos = -1, int YPos = -1);static member InputBox : string * string * string * int * int -> stringPublic 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)) 来分隔这些行。
- Title
- String
可选。 显示在对话框标题栏中的 String 表达式。 如果省略 Title，则标题栏中显示应用程序名称。
- DefaultResponse
- String
可选。
String 表达式。如果未提供其他输入，则作为默认响应显示在文本框中。 如果省略 DefaultResponse，则显示的文本框为空。
- XPos
- Int32
可选。 数值表达式，指定屏幕左边缘与对话框左边缘之间的距离（以缇为单位）。 如果省略 XPos，则对话框水平居中。
- YPos
- Int32
可选。 数值表达式，指定屏幕顶部与对话框上边缘之间的距离（以缇为单位）。 如果省略 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在 SafeTopLevelWindows 级别要求UIPermission，这可能会影响其在部分信任情况下的执行。 有关详细信息，请参阅 请求权限 和 UIPermission 。
