社区
VB基础类
帖子详情
如何使FORM在3分钟没有输入的情况下,自动关闭
PI_2002
2003-08-22 01:30:37
如题
...全文
97
5
打赏
收藏
如何使FORM在3分钟没有输入的情况下,自动关闭
如题
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
射天狼
2003-08-22
打赏
举报
回复
上面的写错了,忘记处理输入了
Option Explicit
Dim ll_Time As Long '计时器变量
Private Sub Form_Load()
ll_Time = 0
Timer1.Interval = 60000 '设时间间隔为一分钟
Timer1.Enabled = True
End Sub
Private Sub Text1_Change()
'在有输入的地方把计时器变量清零,重新计时
ll_Time = 0
End Sub
Private Sub Timer1_Timer()
ll_Time = ll_Time + 1
If ll_Time = 3 Then
MsgBox "3分钟时间到,点击确定要关闭系统!", vbExclamation
Unload Me
End If
End Sub
射天狼
2003-08-22
打赏
举报
回复
Option Explicit
Dim ll_Time As Long '计时器变量
Private Sub Form_Load()
ll_Time = 0
Timer1.Interval = 60000 '设时间间隔为一分钟
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
ll_Time = ll_Time + 1
If ll_Time = 3 Then
MsgBox "3分钟时间到,点击确定要关闭系统!", vbExclamation
Unload Me
End If
End Sub
didishu0807
2003-08-22
打赏
举报
回复
声明一个模块级整型变量N,在窗体上放一个Timer控件,Interval设为6000。在窗体装载时禁用Timer控件,同时把N清零,在form_load事件里启用Timer控件。在Timerer事件对N进行加1操作,同时检测该变量是否等于或大于3,如果是,则结束程序 end 。
DarkChampion
2003-08-22
打赏
举报
回复
应该是把Interval设为60000(一分钟)吧
wumy_ld
2003-08-22
打赏
举报
回复
声明一个模块级整型变量intCount,在窗体上放一个Timer控件,Interval设为1000。在文本框或其它控件的KeyPress事件里禁用Timer控件,同时把intCount清零,在KeyUp事件里启用Timer控件。在Timer控件触发的事件里(Timer只有一个事件)对intCount进行加1操作,同时检测该变量是否等于或大于3,如果是,则结束程序。
Google Android SDK开发范例大全(PDF高清完整版3)(4-3)
4.21 查找程序根目录下所有文件——JavaI/O与ListActivity的结合.. 4.22 加载手机磁盘里的图文件——使用decodeFile方法 4.23 动态放大缩小ImageView里的图片——运用Matrix对象来缩放图文件 4.24 动态旋转图片——...
html5的
form
如何
关闭
自动
完成功能,科技常识:HTML5中
form
如何
关闭
自动
完成功能的方法...
今天小编跟大家讲解下有关HTML5中
form
如何
关闭
自动
完成功能的方法 ,相信小伙伴们对这个话题应该有所关注吧,小编也收集到了有关HTML5中
form
如何
关闭
自动
完成功能的方法 的相关资料,希望小伙伴们看了有所帮助。...
Python
自动
化测试之Selenium
本课程详细介绍了Selenium Python版本的
自动
化测试方法和实践,通过本课程的学习你将掌握如下内容:Selenium 测试环境搭建单元测试、生成测试报告、定位元素、WebDriver属性和方法、WebElement属性和方法、操作
form
表单、操作下拉列表、处理等待、远程测试、Selenium Grid、鼠标事件、键盘事件、调用js、屏幕截图、Selenium IDE、文件上传、设置代理、无界面运行、参数化测试、数据驱动的测试DDT等。
关闭
表单
自动
填充和
自动
填充密码
在
form
标签中,添加 autocomplete 属性,并且值为 off。 <
form
method="post" action="/
form
" autocomplete="off"> ... </
form
> 2. 给单独一个
输入
元素禁用
自动
填充 在
输入
元素标签中,添加 ...
element的
form
表单
关闭
自动
填充
给el-
form
添加autocomplete =‘off’
关闭
自动
填充。后台管理登录页面
输入
账号密码,
输入
框会缓存上一次的数据。
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章