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

我是VBScript的新手，我制作了一个程序，这是一部关于新游戏看门狗的短片。 我现在得到了这个，因为我希望它是定时的，但我更希望它没有按钮，并且它发出了类似于警告的声音（左边有红色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的例子好吗

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

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