Timer1.Interval = 60000
为什么当我写: Timer1.Interval = 120000时就出错了呢,是什么原因,我想把间隔时间加大,行不行

解决方案 »

  1.   

    设置的时间间隔(以毫秒计),在 Timer 控件 Enabled 属性设置为 True 时开始有效,例如,10,000 毫秒等于 10 秒。最大值为 65,535 毫秒,等于 1 分钟多一些。
      

  2.   

    用DateDiff 函数 和timer控件组合
    可以定一小时以上,甚至于一天,一个月都可以
      

  3.   

    下面的文章可以决你的问题
    你可以参照vb中的msdn帮助查找datdiff函数使用方法
    让Timer控件每5分钟触发一次事件   Timer控件的Interval属性可以设置为0到65535之间的任意直,所以用Timer触发事件的最大时间间隔只能有65秒,因此如何能设置更长的时间间隔呢?可以在事件中建立代码,用系统时间确定这个时间间隔。               
    Dim dtNextTime as DatePrivate Sub Form_load()
         Timer1.interval=500
     Timer1.Enabled=True
     dtNextTime=DateAdd("n",5,Now)
    End SubPrivate Sub Timer1_Timer()
     if Now>=dtNextTime Then
      Timer1.Enabled=False
      
      '在此加入你的代码  dtNextTime=DateAdd("n",5,Now) 
      Timer1.Enabled=True
     End if
    End Sub此程序的关键是DateAdd函数,它用于计算在将来的五分钟内的时间。