1、你的代码那里,是7点的时候推送的
If d1 <> Date.today AndAlso Date.Now.Hour = 19 AndAlso Date.Now.Minute = 0 Then
2、执行time人tick的代码那里,把信息也记录一下,确定是不是确实timertick有问题
3、执行函数之后(你不是异步执行的),如果额外有一些请求进来,就要排队等候的,你尝试异步调用函数 http://www.foxtable.com/mobilehelp/scr/3269.htm