lancio di Microsoft Visual Studio , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer , e espandere " Visual Basic " " Modelli installati . " qui sotto Fare clic su "Windows" e fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo per creare un nuovo progetto .
2
doppio clic su " ProgressBar " dal riquadro "Toolbox" per aggiungere un nuovo controllo barra di avanzamento . Fare doppio clic su "Pulsante " per aggiungere un nuovo pulsante al form . Aggiungere un secondo pulsante .
3
doppio clic su " Button1 " per creare un nuovo evento click del pulsante . Aggiungere il seguente codice per creare un ciclo per ripetere la barra di avanzamento fino a quando l'utente fa clic sul secondo pulsante :
Dim xCntr As Integer
xCntr = 1
userWantsToStop = False
Me.ProgressBar1.Minimum = 0
Me.ProgressBar1.Maximum = 1000
Do While ( userWantsToStop = False ) per
Me.ProgressBar1.Value = xCntr
Application.DoEvents ()
System.Threading.Thread.Sleep ( 1 ) per
( xCntr = 1000) Poi
xCntr = 1
End If
xCntr = xCntr + 1
loop
4
Passare di nuovo alla forma visualizzazione Progettazione e fare doppio clic su " Button2 " per creare un evento click di questo pulsante. Aggiungere il seguente codice per ripristinare la barra di avanzamento e interrompere il ciclo while nel passaggio precedente :
userWantsToStop = True
Me.ProgressBar1.Value = 0
5
Premere il tasto " F5 " per eseguire il programma e fare clic su " Button1 " per iniziare a ripetere la barra di avanzamento . Fare clic su " Button2 " per fermarlo .
Programmazione © www.354353.com