在弹出式消息框中显示文本。
intButton = object.Popup(strText,[nSecondsToWait],[strTitle],[nType])
无论主机可执行文件(WScript.exe 或 CScript.exe)是否运行,Popup 方法都显示一个消息框。如果 nSecondsToWaitis 等于零(默认值),弹出式消息框将保持可见,除非用户关闭它。如果 nSecondsToWaitis 大于零,则弹出式消息框在 nSecondsToWait 秒之后关闭。如果未提供参数 strTitle,则在默认情况下,弹出式消息框的标题为 "Windows Script Host"(Windows 脚本宿主)。nType 的含义与 Microsoft Win32® 应用程序编程接口的 MessageBox 函数的含义相同。下列各表显示这些值及其含义。您可组合这些表中的值。
注意 要以 RTL 语言(如希伯来语或阿拉伯语)正确地显示文本,请将十六进制的 hex &h00100000(十进制的 1048576)添加到 nType 参数中。
按钮类型
值 | 说明 |
---|---|
0 | 显示“确定”按钮。 |
1 | 显示“确定”和“取消”按钮。 |
2 | 显示“放弃”、“重试”和“忽略”按钮。 |
3 | 显示“是”、“否”和“取消”按钮。 |
4 | 显示“是”和“否”按钮。 |
5 | 显示“重试”和“取消”按钮。 |
图标类型
值 | 说明 |
---|---|
16 | 显示“停止标记”图标。 |
32 | 显示“问号”图标。 |
48 | 显示“感叹号”图标。 |
64 | 显示“信息标记”图标。 |
上面的两个表中并未涵盖 nType 的所有值。有关完整列表,请参阅 Microsoft Win32 文档。
返回值 intButton 表示用户单击按钮的次数。如果用户在 nSecondsToWait 秒之前未单击按钮,则 intButton 设为 1。
值 | 说明 |
---|---|
1 | “确定”按钮 |
2 | “取消”按钮 |
3 | “放弃”按钮 |
4 | “重试”按钮 |
5 | “忽略”按钮 |
6 | “是”按钮 |
7 | “否”按钮 |
下面的代码生成简单的弹出式窗口。
Dim WshShell, BtnCode
Set WshShell = WScript.CreateObject("WScript.Shell")
BtnCode = WshShell.Popup
("Do you feel alright?", 7, "Answer This Question:", 4 + 32)
Select Case BtnCode
case 6 WScript.Echo "Glad to hear you feel alright."
case 7 WScript.Echo "Hope you're feeling better soon."
case -1 WScript.Echo "Is there anybody out there?"
End Select
var WshShell = WScript.CreateObject("WScript.Shell");
var BtnCode = WshShell.Popup
("Do you feel alright?", 7, "Answer This Question:", 4 + 32);
switch(BtnCode) {
case 6:
WScript.Echo("Glad to hear you feel alright.");
break;
case 7:
WScript.Echo("Hope you're feeling better soon.");
break;
case -1:
WScript.Echo("Is there anybody out there?");
break;
}