IBM Lotus Symphony
|
显示一个提示对话框,用户可以在其中输入文本。输入的内容将被指定给变量。
使用 InputBox 语句可以很方便地在对话框中输入文本。单击“确定”或按 Enter 键可以确认输入的内容。输入将作为函数返回值进行返回。如果使用“取消”关闭对话框,那么 InputBox 将返回一个空字符串("")。
InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])
字符串
Msg:字符串表达式,在对话框中显示为消息。
Title:字符串表达式,在对话框的标题栏中显示。
Default:字符串表达式,如果用户未输入其他内容,它将缺省显示在文本框中。
x_pos:整型表达式,用于指定对话框的水平位置。此位置使用绝对坐标,不参照 Lotus® Symphony™ 应用程序的窗口。
y_pos:整型表达式,用于指定对话框的垂直位置。此位置使用绝对坐标,不参照 Lotus Symphony 应用程序的窗口。
如果省略 x_pos 和 y_pos,对话框将显示在屏幕的中心。该位置在缇中指定。
Sub ExampleInputBox
Dim sText As String
sText = InputBox ("Please enter a phrase:","Dear User")
MsgBox ( sText , 64, "Confirmation of phrase")
End Sub