倒计时

ZHANGYANGYANG

Private Sub Form_Timer()
s = IIf(ss < 10, "0" & ss, "" & ss)
m = IIf(mm < 10, "0" & mm, "" & mm)
h = IIf(hh < 10, "0" & hh, "" & hh)
Me.T1 = h & ":" & m & ":" & s

ss = ss - 1
If hh = 0 And mm = 0 And ss = -1 Then
msg = "试用期时间已到，按回车键结束!"

DoCmd.Quit acQuitSaveAll
End If
If ss = -1 And mm > 0 Then mm = mm - 1: ss = 59
If mm = 0 And hh > 0 Then hh = hh - 1: mm = 59: ss = 59


End Sub  这是我写的代码，就是当倒计时窗体关闭后，下次打开继续，例如关闭时的时间是00：02：23，下次打开倒计时窗体时继续这个时间开始，该怎样写代码？谢谢师傅们！

盗梦

把时间保存到本地表中，下次打开再读取

lynnwang

举一反三
数据很多时，采用二楼的方法建表，此方法永久
只有一个或几个时，采用Form.Tag或全局变量等保存，此方法临时
数据不多时，采用DAO CreateProperty 方法在当前窗体或表或查询对象上创建属性保存，此方法永久

ZHANGYANGYANG

请师傅们能否说详细点？我是新手，最好举个例子。谢谢！怎样保存，怎样读取？

todaynew

http://www.office-cn.net/forum.php?mod=viewthread&tid=117195