如何打开一个窗口让其最小化。 Post By:2012/11/13 18:00:00 [显示全部帖子]
如题,我想让锁定窗口弹出后,就是最小化。应该怎么实现 ?请指导 。。
If Forms("登陆密码").Opened Or Forms("锁定界面").opened Return Else Dim t As New TimeSpan(0,0,0,10,0) '间隔时间为10秒 Dim Seconds As Double =t.TotalMilliseconds Dim d As Double = Tick() If d>= Seconds Then ' MyTimers("自动锁定").Enabled = False '暂停计划1 Forms("主窗口").baseform.hide() Forms("主窗口").close Forms("锁定界面").open Forms("锁定界面").这里应该怎么写? End If End If