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包含多个行，则可以使用回车符（13)）、换行符（Chr(10)）或每行之间的回车符/换行符组合（Chr(Chr(13)至Chr(10)）分隔行。
- Title
- String
可选。
String 表达式显示在对话框的标题栏中。 如果省略 Title，应用程序名称将放在标题栏中。
- DefaultResponse
- String
可选。
String 如果未提供其他输入，则表达式在文本框中显示为默认响应。 如果省略 DefaultResponse，则显示的文本框为空。
- XPos
- Int32
可选。 指定对话框左边缘与屏幕左边缘之间的距离的数字表达式（以 twips 为单位）。 如果省略 XPos，对话框将水平居中。
- YPos
- Int32
可选。 指定对话框上边缘与屏幕顶部的距离的数字表达式（以 twips 为单位）。 如果省略 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 函数需要在 UIPermission 级别上 SafeTopLevelWindows ，这可能会影响其在部分信任情况下的执行。 有关详细信息，请参阅 请求权限 和 UIPermission 。