直接用标签控件排列好格式就好了，至于进入该页面后自动计时，那就直接在load中让计时器=true就是了。
在Form_Activate()中记录结束时间 endTime = DateADD("s", 3600, Now())，并同时启动一个间隔为200毫秒的Timer控件在Timer控件过程中 Me.Caption = TimeSerial(0, 0, DateDiff("s", Now(), endTime))
