Der Visual Basic 2008 Fortschrittsbalken Kontrolle visuell zeigt den Fortschritt einer Operation in einem Programm. Bei der Erstellung des Programms , setzen Sie das "Minimum" und "Maximum" Eigenschaften für den Fortschrittsbalken , und während das Programm führt eine Aktion auf Daten , aktualisieren Sie den Status des Fortschrittsbalken durch eine Änderung seiner "value" Eigenschaft . Zum Beispiel, wenn Ihr Programm eine Datei öffnet und liest 50 Zeilen Text in ein Array von Strings , stellen Sie den Fortschrittsbalken die Mindestanforderungen auf Null und der maximalen bis 50 . Wenn das Programm die ersten 25 Zeilen liest , ändern Sie die Fortschrittsanzeige den Wert auf 25 , um den Fortschritt Marker auf halbem Weg zu zeigen. Anleitung
1
Öffnen Sie eine Visual Basic 2008-Projekt im Entwurfsmodus . Doppelklicken Sie auf das " ProgressBar " Steuerelement, um es dem Formular hinzufügen . Doppelklicken Sie auf den "Button" Steuerelement, um es der Form sowie hinzuzufügen. Ordnen Sie die Steuerelemente auf dem Formular , wie Sie sie zu erscheinen.
2
Öffnen Sie das Codefenster wollen . Type " Importiert System.IO " in der oberen Zeile , um Ihr Programm nennen das System der Ein-und Ausgabe -Funktionen. Sie müssen diese zu öffnen und eine Datei lesen .
3
Öffnen Sie die " Button1 "-Funktion . Geben Sie den folgenden :
Dim Anzahl As Integer = 0
Dim Eingang Wie StreamReader = New StreamReader ( "c: \\ filename.txt " )
Dim Zeilen (1000) As String Dim
insgesamt als Integer
Die erste Deklaration deklariert einen einfachen Zähler Variable. Die zweite öffnet ein StreamReader -Objekt, das eine Textdatei namens "liest filename.txt . " Die dritte Erklärung erstellt ein Array von Strings, die Platz für bis zu 1000 Zeilen aus der Textdatei . Die letzte Erklärung schafft eine Integer-Variable , die Sie verwenden , um die Fortschrittsanzeige zu aktualisieren
4
Geben Sie den folgenden : .
While Not input.EndOfStream
Linien ( count) = input.ReadLine ()
count + = 1 End While
Diese Schleife die Textdatei und speichert und speichert jede Zeile liest in einem Ort in dem Array bis jede Zeile gelesen wurde
5
Geben Sie den folgenden : .
Fortschritt = count
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = Fortschritt
Dies setzt den "Fortschritt" Variable auf den Wert als "count" variable und setzt dann den Minimalwert der Fortschrittsbalken auf Null gesetzt und die maximale auf den Wert , dass "Fortschritt" hält .
6
Geben Sie den folgenden :
For i = 0 To progress - 1 of
callToSomeFunction (Array)
progress - = 1
ProgressBar1.Value = i Next i
Diese Schleife durchläuft jedes Element im Array und führt eine Aktion auf sie in der " callToSomeFunction (Array) "-Zeile. Da jedes Element im Array verarbeitet wird, wird der "Fortschritt " Variable um eins verringert und der Fortschrittsbalken Wert geändert wird , um den Status der Schleife zu reflektieren.