进度条循环

yinbinly

如何让这段进度条循环显示，而不是0-100之后结束

ProgressOn("shipin","anzhuang",'',@DesktopWidth/2-150,@DesktopHeight/2-150,1)
For $i = 10 To 100 Step 10
    Sleep(1000)
    ProgressSet( $i, $i & " %")
Next
ProgressSet(100 , "完成", "Complete")
Sleep(500)
ProgressOff()


Sleep(5000)

user3000

回复 1# yinbinly
你这高级会员的水分似乎很大很大.

Local $htime = TimerInit()
Local $i = 0
ProgressOn("shipin","anzhuang",'',@DesktopWidth/2-150,@DesktopHeight/2-150,1)
While True
        $i += 10
    ProgressSet( $i, $i & " %")
        If $i = 100 Then $i = 0
        If TimerDiff($htime)/1000 >= 5 Then ExitLoop
        Sleep(100)
WEnd
ProgressSet(100 , "完成", "Complete")
ProgressOff()

xz00311

第5次后看不到100，60后就退程序了

gczxhzb

这个连我都会，同意user3000的质疑！