VB 新手 求个简单问题 麻烦大虾帮帮忙

l203ch

看看下面代码
''时间函数
Public Declare Function timeGetTime Lib "winmm.dll" () As Long

然后有个textBOX 里面的内容 为1800   
time1=timeGetTime  '存储当前时间

然后换算  
time = timeGetTime - FZ1time   

if    time >= 1800(textBOX 里面的内容)  then do something

为什么  这个表达式time >= 1800(textBOX 里面的内容) 一直都为真呢????

这样也一样  CInt(time) >= 1800(textBOX 里面的内容) ) 一直为真   

请帮帮忙  我新手初学

ejx2005

直接用时间组件timer 就行了把
设置timer1.interval=val(text1.text)*1000
你在text中填写的就是以秒来算

舒天倦云

time1=timeGetTime
如time1=552412

time1里的数是毫秒既为552.412秒,要除1000才是秒

用timer来记时是不准确的