新手提问进度条

17911

请教让进度条运行方法

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 431, 165, 305, 277)
$Progress1 = GUICtrlCreateProgress(0, 120, 345, 17)
$Button1 = GUICtrlCreateButton("Button1", 8, 40, 113, 25, 0)
$Button2 = GUICtrlCreateButton("Button2", 152, 40, 113, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd

[ 本帖最后由 17911 于 2009-2-24 16:54 编辑 ]

wyx5

要做循环，或者是向里面写入数据，然他达到100%

sxd

Case $Button1
                        For $I = 1 To 10
                        GUICtrlSetData($Progress1,$I&"0")
                        Sleep(1000)
                        Next