Legge til en gjentatt fremgang bar i Microsoft Visual Basic ( VB ) kan gjøre programmet mer brukervennlig , det kommuniserer til brukeren at programmet fungerer i bakgrunnen . En fremdriftsindikator kontroll indikerer visuelt fremdriften av en lang operasjon ved å vise en kontinuerlig bar som fyller inn fra venstre til høyre . Du kan hele tiden vise det samme fremgang bar gjenta seg selv ved hjelp av en " While ... Loop " og endre verdien av fremdriften bar . Du trenger
Microsoft Visual Studio
Vis flere instruksjoner
en
Launch Microsoft Visual Studio , klikk " Nytt prosjekt " fra den venstre ruten på skjermen , og utvide " Visual Basic " under " Installerte maler . " Klikk på " Windows" og dobbeltklikk på "Windows Forms Application " fra sentrum av dialog vinduet for å opprette et nytt prosjekt .
2
Dobbeltklikk på " ProgressBar " fra " Toolbox" -panelet for å legge til en ny fremgang bar kontroll. Dobbeltklikk på " Button" for å legge til en ny knapp i skjemaet . Legg til en ny knapp .
3
Dobbeltklikk på " Button1 " for å lage en ny knapp klikkhendelsen . Legg til følgende kode for å lage en loop for å gjenta fremgang bar før brukeren klikker den andre knappen : en
Dim xCntr As Integer
xCntr = 1
userWantsToStop = False
Me.ProgressBar1.Minimum = 0
Me.ProgressBar1.Maximum = 1000
Mens ( userWantsToStop = False )
Me.ProgressBar1.Value = xCntr
Application.DoEvents ()
System.Threading.Thread.Sleep ( 1 )
p Hvis ( xCntr = 1000 ) Så
xCntr = 1
End If
xCntr = xCntr + 1
Loop
4
Switch tilbake til Form Design utsikt og dobbeltklikk på " Button2 " til skape et klikk hendelsen for denne knappen. Legg til følgende kode for å tilbakestille fremgang bar og stoppe mens loop i forrige trinn : en
userWantsToStop = sant
Me.ProgressBar1.Value = 0
5
Trykk "F5 " for å kjøre programmet og klikk " Button1 " for å starte gjenta fremgang bar . Klikk " Button2 " for å stoppe det .