十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
Timer1.Interval = 500
创新互联网络公司拥有10年的成都网站开发建设经验,成百上千客户的共同信赖。提供成都网站设计、网站制作、网站开发、网站定制、卖友情链接、建网站、网站搭建、自适应网站建设、网页设计师打造企业风格,提供周到的售前咨询和贴心的售后服务
Private Sub Timer1_Timer()
Timer1.Enabled = False
Dim ss As String
ss = Format(Now, "HH:mm:ss")
If ss = "12:00:00" Then
'执行备份语句
End If
Timer1.Enabled = True
End Sub
还有一个办法就是可以用SQL自身的功能,在SQL里面可以添加任务 ,设置周期为每天,时间为12点,到时候执行一下备份
一个程序在同一时刻只能处理一个事件,比如时钟事件处理时间比时钟周期长的话,它不会事件还没处理完又被激活了,也就是在程序代码执行过程中不会接收新的事件。所以要把与时钟有关的处理事物放在一个独立的进程中,这个我也不懂,只知道建立一个对象库,对象库是一个独立的进程,程序启动后启动对像库时钟。就是Activex Dll工程。
Threading.Thread.Sleep(500)这句是线程停止等待的,在这500毫秒的时间里你的任何动作都是不响应的,理论上再SendKeys.Send(TextBox2.Text)这段时间内你可以动作,但是send是毫秒级完成的,你还没有来得及响应就进入了下一次的循环,所以跟卡死类似
解决方法:通过timer定时器延时
如果现在时间是19:57:00,Interval=60000,那么timer1第一次激活时间是20:03:00,早过20:00:00,所以这种方法存在很大的误差。
既然要监视从19:59:59到20:00:00,二者相差仅1秒,你就应该设Interval=1000才对。
这就是你要精确监视时间所付出的代价。可以说,除此之外,似乎找不到其他的办法。