以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  openqq server在服务器上自动启动  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100069)

--  作者：lk15502 --  发布时间：2017/5/4 10:22:00 --  openqq server在服务器上自动启动 在服务器上自动启动openqq server的程序，把程序加入到window启动；在openqq server的项目的afteropenproject中代码： Forms("导航栏").Show() MainTable = Tables("用户表") Forms("OpenQQ Server").Open Dim btn As WinForm.Button = Forms("OpenQQ Server").Controls("启动") btn.PerformClick() 请问如何用代码判断openqq server已经启动，如果已经启动关闭窗口Forms("OpenQQ Server")，同时最小化openqq server;老师这个代码怎么写？

--  作者：有点蓝 --  发布时间：2017/5/4 11:06:00 --   判断openqq server已经启动：http://www.foxtable.com/webhelp/scr/2979.htm 最小化：basemainform.windowstate = 1