timer控件的时间如何超过65535?
VB里timer的时间最多只能有65535，我想设的更长一些，该怎么做？
[解决办法]
timer的时间最多只能有65535，这在最初设计时为最大，但是修改其间隔时间可以在timer定时时间中改写
（由于intervel属性为１０００ms为一秒，定义一个常数为相对于1秒的倍率！
private const Times =??(你想设置的数)
private lngStratTime as long (以上都为窗体级变量)
在计时之初，用一个long变量来保存开始时间lngStartTime=timer()从午夜0时到现在的秒数）
private sub timerObj_timer()
dim lngTimeNow as long '保存当前时间（从午夜0时到现在的秒数）
lngTimeNow =timer()
if （LngTimeNow -LngStartTime）mod (timerObj.Intervel *Times ) = 0 then
StateMent '丁事想做的工作
end if
end sub
