Access 2010中如何实现倒计时退出程序的功能？

作者：绿色风分类：时间：2022-08-18 浏览：166

楼主
lrlxxqxa

创建窗体后，利用插入标签和命令按钮做一个计时器；标签初始值设为10秒

Private Sub Form_Open(Cancel As Integer)
Me.TimerInterval = 1000
Me.lblCountdown.Caption = 10
End Sub

倒计时结束后退出程序

Private Sub Form_Timer()
Me.lblCountdown.Caption = Me.lblCountdown.Caption - 1
If Me.lblCountdown.Caption = 0 Then DoCmd.Quit acQuitSaveNone
End Sub

倒计时退出.rar

2楼
鱿鱼滴味道

没有视频的说

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表