Πώς να χρησιμοποιήσετε τη γραμμή προόδου σε Visual Basic 2008

Ο βασικός έλεγχος bar Visual προόδου του 2008 δείχνει οπτικά την πρόοδο ορισμένων λειτουργιών σε ένα πρόγραμμα . Κατά τη δημιουργία του προγράμματος , μπορείτε να ορίσετε το «ελάχιστο» και «μέγιστο» ιδιότητες για τη γραμμή προόδου , ​​και ενώ το πρόγραμμα εκτελεί κάποια ενέργεια σχετικά με τα δεδομένα , μπορείτε να ενημερώσετε την κατάσταση του γραμμή προόδου με την αλλαγή του "αξία" ιδιοκτησίας. Για παράδειγμα , εάν το πρόγραμμά σας ανοίγει ένα αρχείο και διαβάζει 50 γραμμές κειμένου σε μια σειρά των χορδών , που ελάχιστη της γραμμή προόδου στο μηδέν και το μέγιστο 50 . Όταν το πρόγραμμα διαβάζει τις πρώτες 25 γραμμές , αλλάξτε την τιμή του γραμμή προόδου σε 25 για να δείξει το δείκτη προόδου στο σημείο στα μισά του δρόμου . Οδηγίες
Η

1 Ανοίξτε ένα Visual Basic 2008 του έργου σε κατάσταση σχεδίασης . Κάντε διπλό κλικ στο " ProgressBar " ελέγχου για να το προσθέσετε στη φόρμα . Κάντε διπλό κλικ στο " κουμπί" ελέγχου για να το προσθέσετε στη φόρμα , καθώς και . Τακτοποιήστε τα στοιχεία ελέγχου στη φόρμα , όπως θέλετε να εμφανίζονται . 2

Ανοίξτε το παράθυρο κώδικα . Πληκτρολογήστε " Εισαγωγές System.IO " στην επάνω γραμμή για να κάνει το πρόγραμμά σας καλούν συναρτήσεις εισόδου και εξόδου του συστήματος . Θα πρέπει αυτό να ανοίξει και να διαβάσει ένα αρχείο .
Εικόνων 3

Ανοίξτε τη λειτουργία " Button1_Click " . Πληκτρολογήστε το ακόλουθο :

Δημ. μετράνε As Integer = 0

Dim εισόδου Όπως StreamReader = Νέα StreamReader ( "c : \\ filename.txt " )

Δημ. γραμμές ( 1000 ) όπως String Dim

συνολικά ως Ακέραιος

Η πρώτη δήλωση δηλώνει μια απλή μεταβλητή μετρητή . Η δεύτερη ανοίγει ένα αντικείμενο StreamReader που διαβάζει ένα αρχείο κειμένου που ονομάζεται " filename.txt . " Η τρίτη δήλωση δημιουργεί μια σειρά από χορδές που κρατά έως και 1.000 γραμμές από το αρχείο κειμένου . Η τελευταία δήλωση δημιουργεί μια ακέραια μεταβλητή που θα χρησιμοποιήσετε για να ενημερώσετε τη γραμμή προόδου
Η 4

Πληκτρολογήστε τα ακόλουθα : .

Ενώ δεν input.EndOfStream

γραμμές ( καταμέτρηση ) = input.ReadLine ( )

μετράνε + = 1

Τέλος Ενώ

Αυτός ο βρόχος διαβάζει το αρχείο κειμένου και τα καταστήματα και τα καταστήματα κάθε γραμμή σε ένα σημείο στη συστοιχία μέχρι να έχει διαβάσει κάθε γραμμή
5

Πληκτρολογήστε τα ακόλουθα : .

πρόοδο = μετράνε

ProgressBar1.Minimum = 0

ProgressBar1.Maximum = πρόοδο

Αυτό θέτει την " πρόοδο " μεταβλητή με την τιμή ως το " μετράνε " μεταβλητή , και στη συνέχεια καθορίζει την ελάχιστη τιμή στη γραμμή προόδου για το μηδέν και η μέγιστη τιμή στο ότι «η πρόοδος » κατέχει .

6

Πληκτρολογήστε τα παρακάτω:

Για i = 0 για την πρόοδο - 1

callToSomeFunction ( array)

πρόοδο - = 1

ProgressBar1.Value = i

Next i

This κύκλους βρόχο μέσα από κάθε στοιχείο στη σειρά και εκτελεί μια ενέργεια σε αυτό το " callToSomeFunction ( array) " γραμμή . Όπως κάθε στοιχείο του πίνακα είναι η επεξεργασία, η "πρόοδος" μεταβλητή μειώνεται κατά ένα και η τιμή γραμμή προόδου αλλάζει για να δείξει την κατάσταση του βρόχου .
Η
εικόνων