- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 代码运行中等待问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121765)
-- 发布时间：2018/7/12 17:37:00
-- 代码运行中等待问题
请教：
代码在运行过程中，由于计算或引用较多，出现较长时间等待，拟用上图进行提示等候，防止用户乱点出错。请教如何实现？
我用模式窗口设置等待，打开后，代码
此主题相关图片如下：1.png
不继续向下运行，关闭窗口后才继续执行后续代码，失去了等待的意义。
此主题相关图片如下：1.png不继续向下运行，关闭窗口后才继续执行后续代码，失去了等待的意义。
-- 发布时间：2018/7/12 20:41:00
--
参考这个例子
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=121408&skin=0
下载信息 [文件大小：288.0 KB 下载次数：9]
点击浏览该文件:锁项目.table
-- 发布时间：2018/7/12 20:42:00
--
| 下载信息 [文件大小：292.0 KB 下载次数：4] | |
| 点击浏览该文件:遮罩窗口_小例.table |
-- 发布时间：2018/7/12 20:48:00
--
老师这是试用版的例子，试用版已过期，打开不了，能否转为正式版的
-- 发布时间：2018/7/12 20:55:00
--
安装一个商业版，即可。
-- 发布时间：2018/7/13 15:55:00
--
老师：第一个例子未能理解参考相同的地方，第二个例子看不懂，
e.Form.BaseForm.Width = BaseMainForm.Width
e.Form.BaseForm.Height = BaseMainForm.Height
e.Form.BaseForm.Top = BaseMainForm.Top
e.Form.BaseForm.Left = BaseMainForm.Left
e.Form.BaseForm.FormBorderStyle = Windows.Forms.FormBorderStyle.None \'消除窗口的边框
e.Form.BaseForm.Opacity = 0.1
以上这些在帮助中没找到，不知意义
能不能明确提示下呀？
-- 发布时间：2018/7/13 16:37:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:遮罩窗口_小例.table |
-- 发布时间：2018/7/13 17:12:00
--
谢谢老师基本懂了，就是 “ Forms("窗口3").baseform.Topmost = True ” 这个代码是啥意思？
-- 发布时间：2018/7/13 18:33:00
--
以下是引用13861676007在2018/7/13 17:12:00的发言：
谢谢老师基本懂了，就是 “ Forms("窗口3").baseform.Topmost = True ” 这个代码是啥意思？
谢谢老师基本懂了，就是 “ Forms("窗口3").baseform.Topmost = True ” 这个代码是啥意思？
把窗口3置顶的意思。