以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]30秒内不操作没有是否保存提示即关闭系统  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=60738)
--  作者：ZHX88863808
--  发布时间：2014/11/30 13:10:00
--  [求助]30秒内不操作没有是否保存提示即关闭系统

If LastInputTickCount > 30000 Then
    Syscmd.Project.Exit()
End If

前面这段代码是30秒内不操作即关闭系统，但是这段代码有是否保存提示，不过有些时侯操作员走开，其他人不注意操作，这时侯如果有提示保存的就容易出现错误，我想如果没有保存提示，即30秒内不操作不需要任何提示即关闭系统，请老师们帮忙写个代码，谢谢！
--  作者：游
--  发布时间：2014/11/30 13:31:00
--  
自己看一下关于  MessageBox  的帮助

加进去就可以了
--  作者：有点甜
--  发布时间：2014/11/30 14:15:00
--  
If LastInputTickCount > 30000 Then
    Syscmd.Project.Exit(False)
End If
--  作者：ZHX88863808
--  发布时间：2014/11/30 16:26:00
--  
谢谢老师!
--  作者：hunanwl
--  发布时间：2014/11/30 20:05:00
--  
那要是  30分钟内 没操作 自动关闭系统呢  不是输入哦  是30分钟内没操作哦
--  作者：有点甜
--  发布时间：2014/11/30 20:09:00
--  

 这个 LastInputTickCount 变量的意思，就是没有操作电脑的时间

 

 

LastInputTickCount


返回一个整数，单位为毫秒，表示用户已经有多长时间没有操作计算机。