ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 17092|回复: 6

[求助] 窗体.show 0,当中的参数0是什么意思?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2011-8-6 15:36 | 显示全部楼层 |阅读模式
若不加这个0参数,application.wait now() +3/86400 就不会执行。
谢谢。

这是一个启动后隐藏EXCEL界面,只显示窗体,在显示3秒后自动关闭窗体并退出EXCEL的过程。

Private Sub Workbook_Opden()
Me.Saved = True
Application.Visible = False
UserForm1.Show 0
Application.Wait Now() + 3 / 86400
Unload UserForm1
Application.Quit
End Sub

TA的精华主题

TA的得分主题

发表于 2011-8-6 15:58 | 显示全部楼层
显示窗体的语句:
  (1)模式窗体的显示代码:
  窗体名称.Show  vbModal
  也可以写成:窗体名称.Show 1
  (2)无模式窗体的显示代码:
  窗体名称.Show  vbModeless
  也可以写成:窗体名称.Show 0

(1)模式窗体:窗体显示后将停显示之后的代码直到退出或隐藏此窗体,并且必须退出或隐藏此窗体后,才可以操作非此窗体的其他界面元素。
  也就是说,当你使用模式窗体显示某窗体的时候,当程序执行完“显示窗体”这条命令后,将暂停执行程序里剩余的语句,真正这个窗体被隐藏或退出。关且当窗体显示出来以后,你不能激活该窗体以外的任何区域。
  (2)无模式窗体:窗体显示后会继续执行程序里余下的语句,而其他的窗体或界面也可以进行操作。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2011-8-6 15:58 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
0 表示UserForm是无模式的,缺省为模态的。
当UserForm是模态的,用户在使用应用程序的其它部分之前,必须先对其作出响应。在隐藏或卸载 UserForm 之前,后续代码不会被执行。

TA的精华主题

TA的得分主题

发表于 2011-8-6 16:00 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-8-6 16:06 | 显示全部楼层
谢谢各位的快速回帖。
通过测试,我现在完全明白了。。。
谢谢。

TA的精华主题

TA的得分主题

发表于 2021-2-19 12:07 | 显示全部楼层
xhqxiao 发表于 2011-8-6 16:00
参考
http://club.excelhome.net/viewthread.php?tid=470603&page=7#pid3085124
第69楼

http://club.excelhome.net/forum. ... ead&tid=1575262
求助,窗体.show 提示错误,使用窗体.show 0不提示错误  请教哪里出问题了,在多台电脑上都试过了。

TA的精华主题

TA的得分主题

发表于 2021-2-19 12:08 | 显示全部楼层
zjdh 发表于 2011-8-6 15:58
0 表示UserForm是无模式的,缺省为模态的。
当UserForm是模态的,用户在使用应用程序的其它部分之前,必须 ...

http://club.excelhome.net/forum. ... ead&tid=1575262
求助,窗体.show 提示错误,使用窗体.show 0不提示错误  请教哪里出问题了,在多台电脑上都试过了。
我想使用窗体.show  必须对窗体做回应后才能点选excel 表
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-16 18:47 , Processed in 0.029755 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表