Wscript的popup
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
WshSHell.popup "枚举主键,1 秒钟后本窗口将自动关闭!", 1, "示例", 0 + 64 popup 方法
在弹出式消息框中显示文本。
intButton = object.Popup(strText,[nSecondsToWait],[strTitle],[nType])
参数
object
WshShell 对象。
strText
包含要显示在弹出式消息框中的文本的字符串值。
nSecondsToWait
可选。表示弹出式消息框最长显示时间(秒)的数值。
strTitle
可选。包含要作为弹出式消息框的标题显示的文本的字符串值。
nType
可选。表示要显示在弹出式消息框中的按钮和图标类型的数值。这些类型确定消息框的使用方法。
IntButton
表示用户单击以解除消息框的按钮号的整数值。该值由 Popup 方法返回。
说明
无论主机可执行文件(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 “否”按钮
示例
下面的代码生成简单的弹出式窗口。
[VBScript]
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
[JScript]
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;
}
欢迎加入QQ技术群聊:70539804
Wscript的popup的更多相关文章
- excel vba 数据分析
(Visual Basic Application) VBA(Visual Basic for Application)是Microsoft Office系列软件的内置编程语言,其语法结构与Visua ...
- 在Jenkins上做一个定时闹钟
[本文出自天外归云的博客园] 利用Jenkins定时任务来做一个闹钟,每天隔一段时间提醒自己一下“你该休息了!别老坐着!出去走一走!珍爱生命,远离久坐!” 首先在Jenkins上创建一个node. 创 ...
- vb 案例学习
' ================================================================================================== ...
- VBA精彩代码分享-2
VBA开发中经常需要提示消息框,如果不关闭程序就会暂时中断,这里分享下VBA如何实现消息框的自动关闭,总共有三种方法: 第一种方法 Public Declare Function MsgBoxTime ...
- 使用Wscript/cscript调用VB脚本
●强制用Wscript.exe执行 SET Wshell=CreateObject("Wscript.Shell") if lcase(right(Wscript.fullName ...
- Wscript.Shell 对象详细介绍
详细 WshShell 对象ProgID Wscript.Shell 文件名 WSHom.Ocx CLSID F935DC22-1CF0-11d0-ADB9-00C04FD58A0B IID F935 ...
- Wscript对象具体解释
15.6 Windows脚本宿主的内建对象 每一个编程环境都提供了自己的对象模型,开发者 能够使用这些对象模型实现各种解决方式,WSH也不例外.WSH包括了一组核心对象,分别包括了属性和方法,能够用 ...
- 关于淘宝店铺装修弹出层popup的记录
小龙最近做了一下下淘宝的店铺装修,里面封装的widget深不见底,刚刚整明白popup,也就是弹出层的使用方法,大神勿喷: <div class="area001">触 ...
- 背水一战 Windows 10 (36) - 控件(弹出类): ToolTip, Popup, PopupMenu
[源码下载] 背水一战 Windows 10 (36) - 控件(弹出类): ToolTip, Popup, PopupMenu 作者:webabcd 介绍背水一战 Windows 10 之 控件(弹 ...
随机推荐
- 1、python与ipython的下载与安装
1.ipython的下载与安装 下载链接: wget -c https://github.com/downloads/ipython/ipython/ipython-0.13.1.tar.gz ##下 ...
- CountDownLatch、信号量
countDownlatch可以阻塞线程,可以在某种条件下继续执行 不安全的:
- Entity Framework 6.0 Tutorials(8):Custom Code-First Conventions
Custom Code-First Conventions: Code-First has a set of default behaviors for the models that are ref ...
- getContextPath、getServletPath、getRequestURI,getRealPath的区别
假定你的web application 项目名称为news,你在浏览器中输入请求路径: http://localhost:8080/news/main/list.jsp 则执行下面向行代码后打印出如下 ...
- 利用Thread.stop完成方法执行超时中断
示例代码可以从github上获取 https://github.com/git-simm/simm-framework.git 接上篇博客<FutureTask子线程取消执行的状态判断> ...
- py_initialize:C调Python出错 是初始化错误?
还是pythonpath和pythonname变量没有配置正确? py_initialize()方法是什么? In an application embedding Python, this shou ...
- 编写高质量代码改善C#程序的157个建议——建议38:小心闭包中的陷阱
建议38:小心闭包中的陷阱 先看一下下面的代码,设想一下输出的是什么? static void Main(string[] args) { List<Action> lists = new ...
- tomcat启动startup.bat一闪而过
编辑startup.bat,在文本最后添加PAUSE,保存后打开startup.bat,此时窗口会暂停,并出现错误信息,然后按照错误提示纠正即可!
- Sql Server - CURSOR (游标)
1.声明游标 DECLARE 游标名 CURSOR SELECT语句(注:此处一定是SELECT语句) 2.打开游标 OPEN 游标名 3.读取 ...
- Linux中的SELinux与chcon以及Samba实现【转】
一.SELinux SElinux的前身是NSA(美国国家安全局)发起的一个项目.它的目的是将系统加固到可以达到军方级别. 为什么NSA选择Linux呢? 在目前市面上大多数操作系统都是商用闭源的,只 ...