回 帖 发 新 帖 刷新版面

主题:求代码:怎样在VB中实现自动关闭窗体?

请各位高手给我出招:在VB中,在多个窗体中,其中包括Form1、Form2和Form3。在Form1实现这样的功能:如果在Form1中5分钟没有操作鼠标,则自动关闭Form1、Form2和Form3(判断Form2和Form3是否打开,打开则自动关闭)。
谢谢各位高手帮我在VB中编写这样的代码! 
思路:VB 中有 鼠标 移动事件,用一个 Time 计时,如果鼠标动,就停止时间运行,将以前所计时的时间清空,如果鼠标没动,则开始计时,到 300 秒时  则 写一句 unload form1  unload form2  unload form 3

回复列表 (共1个回复)

沙发



dim i
plutate timer1()
i=300-i
if i=0  then
unload me
end if
end sub

我来回复

您尚未登录,请登录后再回复。点此登录或注册