UC知道call input_key() 是什么意思
来源：百度知道 编辑：UC知道 时间：2024/06/14 18:22:03
原文件如下：
set ws=createobject("wscript.shell")
call input_key()
private sub input_key()
a=inputbox("a-我的文档"&vbcrlf&"b-我的电脑"&vbcrlf&"c-新建文件夹"&vbcrlf&"d-最近的文档"&vbcrlf&"e-本地磁盘(F:)"&vbcrlf&vbcrlf&"请选择编号:","温馨提示")
select case a
case "a"
msgbox"我的文档",4096+64,"温馨提示"
case "b"
msgbox"我的电脑",4096+64,"温馨提示"
case "c"
msgbox"新建文件夹",4096+64,"温馨提示"
case "d"
msgbox"最近的文档",4096+64,"温馨提示"
case "e"
msgbox"本地磁盘(F:)",4096+64,"温馨提示"
case else
msgbox"您的输入不合法,请重新输入!",4096+16,"出错提示"
call input_key()
end select
end sub
另外请问msgbox中“本地磁盘(F:)",4096+64,"温馨提示" 中的4096+64是表达什么，我在后面再+1
VBS 是基于Visual Basic的一种脚本语言~
call input_key()就是 调用这个过程 private sub input_key()
msgbox 第二个参数值（type）表示对话框的显示按钮 图标种类 数量
4096是系统强制返回 64 显示问号
常数 值 描述
vbOKOnly 0 只显示 OK 按钮。
VbOKCancel 1 显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。
VbYesNo 4 显示 Yes 及 No 按钮。
VbRetryCancel 5 显示 Retry 及 Cancel 按钮。
VbCritical 16 显示 Critical Message 图标。
VbQuestion 32 显示 Warning Query 图标。
VbExclamation 48 显示 Warning Message 图标。
VbInformation 64 显示 Information Message 图标。
vbDefaultButton1 0 第一个按钮是缺省值。
vbDefaultButton2 256 第二个按钮是缺省值。
vbDefaultButton3 512 第三个按钮是缺省值。
vbDefaultButton4 768 第四个按钮是缺省值。
vbApplicationModal 0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。
vbSystemModal 4096 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。
vbMsgBoxHelpButton 16384 将Help按钮添加到消息框
VbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口
vbMsgBoxRight 524288 文本为右