Πώς να χρησιμοποιήσετε Loops σε VB6

Η κατανόηση του πώς βρόχους εργάζονται σε Visual Basic 6 ( VB6 ) είναι σημαντική, διότι επιτρέπει να εκτελέσετε το μπλοκ του κώδικα επανειλημμένα . Οι δύο κύριοι τύποι των βρόχων είναι " για" και " κάνει" βρόχους . Α " για" βρόχος είναι μια στενογραφίας έκδοση ενός "do" βρόχος που χρησιμοποιείται όταν ο αριθμός των επαναλήψεων είναι γνωστός εκ των προτέρων. Ορισμένες χρήσεις ενός βρόχου ανάγνωση στις γραμμές από ένα αρχείο , εκτύπωση όνομα του καθενός από μια λίστα των εργαζομένων και τη διαλογή μέσω μιας σειράς ψάχνει για μια συγκεκριμένη τιμή. Οδηγίες
Η

1 Ανοίξτε το αρχείο προέλευσης σε Visual Basic 6 2

Προσθήκη βρόχος "for" πληκτρολογώντας τον ακόλουθο κώδικα στη λειτουργία σας : .

Dim x As Integer

Dim μετράνε As Integer

x = 0

Για count = 1 έως 6 Βήμα 2

x = x + 2

Επόμενο

A "για " βρόγχου αποτελείται από έναν μετρητή , το εύρος του μετρητή , ένα βήμα και τις εντολές για να εκτελέσει κατά τη διάρκεια κάθε επανάληψης . Το " βήμα " επιχείρημα θέτει πόσο ο μετρητής θα αυξηθεί μεταξύ των επαναλήψεων . Εάν παραλείψετε το " βήμα " λέξη-κλειδί είναι στην προεπιλεγμένη τιμή 1 . Στο παράδειγμα , κατά τη διάρκεια της πρώτης επανάληψης , " μετράνε " είναι ίσο με το 1 και το " Χ" έχει οριστεί σε 2 ( 0 +2 ) . Από τη δεύτερη επανάληψη " μετράνε " είναι ρυθμισμένο στο 3 και το " X " είναι ρυθμισμένο στο 4 ( 2 +2 )

Αν θέλετε να βρόχο μέσα από μια λίστα αντ 'αυτού, προσθέστε τον ακόλουθο κώδικα : .

Δημ. MyColors ( 2 ) , όπως το χρώμα String

Dim ως String

MyColors ( 0 ) = "Blue "

MyColors ( 1 ) = " Πράσινη "

MyColors ( 2 ) = " Yellow"

για κάθε χρώματος σε MyColors

Debug.Print χρώμα

Επόμενο

Οι βρόχος επαναλαμβάνει για κάθε τιμή στη λίστα, η οποία είναι τυπικά ένας πίνακας ή συλλογής. Η μεταβλητή επανάληψη , « χρώμα », πρέπει να είναι του ίδιου τύπου με τα στοιχεία της λίστας
εικόνων 3

Προσθέστε ένα "do " loop πληκτρολογώντας τον ακόλουθο κώδικα : .

Δημ. x ως Ακέραιος

x = 0

Do While x <10

x = x + 2

Loop

ο βρόχος κρατά την επανάληψη , ενώ η κατάσταση μετά το "Do" κλειδί ικανοποιείται . Η κατάσταση ελέγχεται από την αρχή πριν από κάθε νέα επανάληψη . Εναλλακτικά , μπορείτε να το ρυθμίσετε να επαναλάβει μέχρι να ικανοποιείται μια συνθήκη με την προσθήκη του παρακάτω κώδικα :

Κάντε

X = X + 2

Loop Μέχρι X > 10

σε ένα « βρόχο μέχρι να " δομή η κατάσταση ελέγχεται μετά το τέλος της κάθε επανάληψης . Αν θέλετε να βγείτε από το βρόχο πριν πληρούται η προϋπόθεση , προσθέστε "Exit Do " εντός του βρόχου σας .
Η

4 Αποθηκεύστε το αρχείο VB6 , την κατάρτιση και την εκτέλεση του προγράμματος για να δείτε βρόχο .


εικόνων