Lancering Microsoft Visual Studio , klikt u op " New Project" van het linkerpaneel van uw computerscherm , en uitbreiden " Visual Basic " onder " Installed Sjablonen . " Klik op " Windows " en dubbelklik op " Windows Forms Application " van het centrum van het dialoogvenster om een ​​nieuw project aan te maken .

Dubbelklik op " ProgressBar " 2 van de " Toolbox " deelvenster toe te voegen een nieuwe voortgangsbalk controle. Dubbelklik op " knop" om een nieuwe knop toe te voegen aan het formulier . Voeg een tweede knop .

Dubbelklik op " Button1 " 3 om een nieuwe knop klikken gebeurtenis te maken . Voeg de volgende code om een ​​lus om de voortgangsbalk te herhalen maken totdat de gebruiker de tweede knop klikt :

Dim xCntr
als Geheel

xCntr = 1

userWantsToStop
= False < br >

Me.ProgressBar1.Minimum = 0

Me.ProgressBar1.Maximum
= 1000

Do While ( userWantsToStop = False ) op Twitter

Me.ProgressBar1.Value = xCntr

Application.DoEvents ( ) op

System.Threading.Thread.Sleep ( 1 ) op

Als ( xCntr = 1000 ) dan

xCntr
= 1

End
Als

xCntr = xCntr +

Loop

Schakelaar 1 Goedkope 4 terug naar de ontwerpweergave en dubbelklik op " Button2 " naar Form maak een click event voor deze toets . Voeg de volgende code aan de voortgangsbalk te resetten en stop de while-lus in de vorige stap :

userWantsToStop
= True

Me.ProgressBar1.Value = 0
5

Druk op " F5 " om het programma uit te voeren en klik op " Button1 " om te beginnen met het herhalen van de voortgangsbalk . Klik op " Button2 " om het te stoppen .