Nwlapcug.com


Come utilizzare la barra di avanzamento in Visual Basic 2008

Visual Basic 2008 il controllo Mostra visivamente lo stato di avanzamento di un'operazione in un programma. Quando si crea il programma, impostare il "minimo" e "massima" proprietà per la barra di avanzamento, e mentre il programma esegue un'azione sui dati, aggiornare lo stato della barra di progresso modificandone la proprietà di "valore". Ad esempio, se il programma apre un file e legge 50 righe di testo in una matrice di stringhe, è necessario impostare minima della barra di progresso a zero e massima a 50. Quando il programma legge le prime 25 righe, modificare lo stato di avanzamento valore del bar a 25 per mostrare l'indicatore di progresso al punto a metà strada.

Istruzioni

1

Aprire un progetto di Visual Basic 2008 in modalità progettazione. Fare doppio clic sul controllo "ProgressBar" per aggiungerlo al form. Fare doppio clic sul "Pulsante" per aggiungerlo al modulo pure. Disporre i controlli sul form che si desidera vengano visualizzati.

2

Aprire la finestra di codice. Digitare "Imports System.IO" sulla riga superiore per rendere il vostro programma chiamare l'input del sistema e le funzioni di output. Hai bisogno di questo per aprire e leggere un file.

3

Aprire la funzione "Button1_Click". Digitare quanto segue:

Dim count As Integer = 0

Dim input As StreamReader = New StreamReader("c:\filename.txt")

Dim lines(1000) As String

Dim total as Integer

La prima dichiarazione dichiara una variabile contatore semplice. Il secondo si apre un oggetto StreamReader che legge un file di testo chiamato "nomefile. txt." La terza dichiarazione crea una matrice di stringhe che contiene fino a 1.000 righe dal file di testo. L'ultima dichiarazione crea una variabile integer che si utilizzerà per aggiornare la barra di avanzamento.

4

Digitare quanto segue:

Mentre non di input. EndOfStream

Lines(count) = input. ReadLine)

Count + = 1

End While

Questo ciclo legge il file di testo e memorizza e memorizza ogni riga in un posto nella matrice finché non è stato letto ogni riga.

5

Digitare quanto segue:

progresso = count

ProgressBar1.Minimum = 0

ProgressBar1. Maximum = progresso

Questo imposta la variabile di "progresso" per il valore della variabile "totali" e quindi imposta il valore minimo della barra di avanzamento a zero e il valore massimo al valore contenente "progresso".

6

Digitare quanto segue:

Per i = 0 To progresso - 1

callToSomeFunction(array)

progresso-= 1

ProgressBar1. Value = io

Prossima ho

Questo ciclo ciclicamente ogni elemento della matrice ed esegue un'azione su di esso nella linea "callToSomeFunction(array)". Come ogni elemento della matrice viene elaborato, la variabile di "progresso" è decrementata di uno e il valore di barra di stato viene modificato per riflettere lo stato del ciclo.