VBScript'警报'而不是弹出窗口

Question

我是VBScript世界的新手，我制作了一个节目，这是一部关于新游戏Watch Dogs的短片。 我现在有这个，因为我想要它定时，但我更喜欢它，如果它没有按钮，它发出像警告一样的噪音（左边的红色x的那些） 这是我目前的代码：

Option Explicit
Dim Wshell, BtnCode

Set Wshell = CreateObject("wscript.shell")

BtnCode= Wshell.Popup ("Tracking IP", 1, "CitiOS Firewall")

BtnCode= Wshell.Popup ("IP Rooted", 2, "CitiOS Firewall")

BtnCode= Wshell.Popup ("Device Identified as: Smartphone", 2, "CitiOS Firewall")

BtnCode= Wshell.Popup ("Hacker Identified as: Aide...", 1, "CitiOS Firewall")

BtnCode= Wshell.Popup ("The Mainframe is under an attack", 2, "CitiOS Firewall")

BtnCode= Wshell.Popup ("Blackout Activated by remote host", 2, "CitiOS Firewall")

BtnCode= Wshell.popup ("Emergency Lockdown In Place", 2, "CitiOS Remote Firewall")

请给我一个答案的例子：D

Answer 1

intButton = object.Popup(strText,[nSecondsToWait],[strTitle],[nType])

您可以自定义图标和按钮，但无法隐藏所有按钮。 检查docs中最后一个参数的值。