请问有没有检测窗口运行的命令?

来源:百度知道 编辑:UC知道 时间:2024/06/15 22:55:34
我现在想这样.
如果有窗口是运行中(也就是show),就执行下面的语句。
Form.windowstate=vbminimized
但因为不知得是那个窗体运行(Form1~Form6)随便一个或同时几个。
但如果直接用
Form1.windowstate=vbminimized
Form2.windowstate=vbminimized
Form3.windowstate=vbminimized
......
这样全部最小化,又会出现问题。(因为一些窗口在载入时生成很多数据,没有载入窗体而直接最小化窗口这样的命令会出错...)

代码开始加入 on error resume next 可以解决你的问题.

但当你的代码里有其他错误处理的时候 你可以进行错误号的判断.比如 全部最小化时出现了错误,错误号码是"100" . 那你可以这样写:

on error goto cuowu
...
代码执行部分
Form1.windowstate=vbminimized
Form2.windowstate=vbminimized
Form3.windowstate=vbminimized
exit sub
cuowu:
if err.number="100" then resume next