/vbscript/
VBScript InputBox 函数
  1. VB 教程
    1. VBScript 教程
    2. VBScript 简介
    3. VBScript 用法
    4. VBScript 变量
    5. VBScript 程序
    6. VBScript 条件语句
    7. VBScript 循环语句
    8. VBScript 总结
    9. VBScript 实例
    10. VBScript 函数
    11. VBScript 关键字
  2. VB 函数
    1. VBScript Round 函数
    2. VBScript RGB 函数
    3. VBScript MsgBox 函数
    4. VBScript LoadPicture 函数
    5. VBScript VarType 函数
    6. VBScript IsObject 函数
    7. VBScript TypeName 函数
    8. VBScript IsNumeric 函数
    9. VBScript SetLocale 函数
    10. VBScript IsNull 函数
    11. VBScript String 函数
    12. VBScript IsEmpty 函数
    13. VBScript StrComp 函数
    14. VBScript InputBox 函数
    15. VBScript Space 函数
    16. VBScript GetRef 函数
    17. VBScript Right 函数
    18. VBScript GetObject 函数
    19. VBScript Replace 函数
    20. VBScript GetLocale 函数
    21. VBScript Mid 函数
    22. VBScript Eval 函数
    23. VBScript Trim 函数
    24. VBScript CreateObject 函数
    25. VBScript RTrim 函数
    26. VBScript UCase 函数
    27. VBScript LTrim 函数
    28. VBScript StrReverse 函数
    29. VBScript Len 函数
    30. VBScript Left 函数
    31. VBScript Array 函数
    32. VBScript Exp 函数
    33. VBScript LCase 函数
    34. VBScript Tan 函数
    35. VBScript Cos 函数
    36. VBScript InStrRev 函数
    37. VBScript Sqr 函数
    38. VBScript Atn 函数
    39. VBScript InStr 函数
    40. VBScript Sin 函数
    41. VBScript Abs 函数
    42. VBScript UBound 函数
    43. VBScript Sgn 函数
    44. VBScript FormatPercent 函数
    45. VBScript Split 函数
    46. VBScript Rnd 函数
    47. VBScript FormatNumber 函数
    48. VBScript LBound 函数
    49. VBScript Join 函数
    50. VBScript Log 函数
    51. VBScript FormatCurrency 函数
    52. VBScript IsArray 函数
    53. VBScript Fix 函数
    54. VBScript Oct 函数
    55. VBScript Filter 函数
    56. VBScript Int 函数
    57. VBScript Hex 函数
    58. VBScript CBool 函数
    59. VBScript CStr 函数
    60. VBScript Asc 函数
    61. VBScript CSng 函数
    62. VBScript Year 函数
    63. VBScript CLng 函数
    64. VBScript WeekdayName 函数
    65. VBScript CInt 函数
    66. VBScript Weekday 函数
    67. VBScript Chr 函数
    68. VBScript TimeValue 函数
    69. VBScript CDbl 函数
    70. VBScript TimeSerial 函数
    71. VBScript Timer 函数
    72. VBScript CCur 函数
    73. VBScript Time 函数
    74. VBScript CByte 函数
    75. VBScript Second 函数
    76. VBScript Now 函数
    77. VBScript DatePart 函数
    78. VBScript MonthName 函数
    79. VBScript DateDiff 函数
    80. VBScript Month 函数
    81. VBScript DateAdd 函数
    82. VBScript Minute 函数
    83. VBScript Date 函数
    84. VBScript IsDate 函数
    85. VBScript CDate 函数
    86. VBScript Hour 函数
    87. VBScript FormatDateTime 函数
    88. VBScript Day 函数
    89. VBScript DateValue 函数
    90. VBScript DateSerial 函数
阅读(2378) 赞(0)

VBScript InputBox 函数

2015-09-23 02:09:34 更新

VBScript InputBox 函数在对话框中显示提示，等待用户输入文本或者单击按钮，并返回文本框的内容。

VBScript 参考手册完整的 VBScript 参考手册

InputBox 函数显示一个对话框，用户可在其中输入文本并/或点击一个按钮。如果用户点击点击 OK 按钮或按键盘上的 ENTER 键， 则 InputBox 函数返回文本框中的文本。如果用户点击 Cancel 按钮，函数返回一个空字符串("")。

注意：如果同时规定 helpfile 和 context 参数，则会向对话框添加一个 Help 按钮。

提示：请参阅 MsgBox 函数。

语法

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

参数 描述
prompt 必需。显示在对话框中的消息。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符（Chr(13)）、换行符（Chr(10)）或回车换行符的组合（Chr(13) & Chr(10)）来分隔各行。
title 可选。对话框的标题。默认是应用程序的名称。
default 可选。一个在文本框中的默认文本。
xpos 可选。数值表达式，用于指定对话框的左边缘与屏幕左边缘的水平距离（单位为 twips*）。如果省略 xpos，则对话框会在水平方向居中。
ypos 可选。数值表达式，用于指定对话框的上边缘与屏幕上边缘的垂直距离（单位为 twips*）。如果省略 ypos，则对话框显示在屏幕垂直方向距下边缘大约三分之一处。
helpfile 可选。字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。必须与 context 参数一起使用。
context 可选。数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。必须与 helpfile 参数一起使用。

* twip 是度量单位，在视觉上与系统显示的相同。

1 twip 为 1/1440 英寸。

实例

实例 1

<script type="text/vbscript">
Function myFunction()
fname=InputBox("Enter your name")
End Function
</script>

尝试一下 »

实例 2

带有标题的提示框：

<script type="text/vbscript">
Function myFunction()
fname=InputBox("Enter your name","Userinput")
End Function
</script>

尝试一下 »

实例 3

带有输入框默认文本的提示框：

<script type="text/vbscript">
Function myFunction()
fname=InputBox("Enter your name",,"Donald Duck")
End Function
</script>

尝试一下 »

实例 4

一个显示在距屏幕左边缘 700 twips* 位置的提示框。

<script type="text/vbscript">
Function myFunction()
fname=InputBox("Enter your name",,,700)
End Function
</script>

尝试一下 »

实例 5

一个显示在距屏幕上边缘 500 twips* 位置的提示框。

<script type="text/vbscript">
Function myFunction()
fname=InputBox("Enter your name",,,,500)
End Function
</script>

尝试一下 »
VBScript 参考手册完整的 VBScript 参考手册
← VBScript StrComp 函数
VBScript Space 函数 →

推荐文章

推荐教程

技术文章