VB.Net Για κάθε πρόταση…Επόμενο, Έξοδος, Συνέχεια

VB.Net για κάθε βρόχο

Το VB.Net For Each είναι μια τουαλέταping Δήλωση. Θα πρέπει να χρησιμοποιείτε αυτήν τη δήλωση όταν χρειάζεται να επαναλάβετε ένα σύνολο δηλώσεων για κάθε στοιχείο που έχετε σε μια συλλογή. Μπορείτε να τη χρησιμοποιήσετε για να χειριστείτε όλα τα στοιχεία που περιέχονται σε μια συλλογή ή έναν πίνακα.

Σύνταξη του VB.Net Για Κάθε… Επόμενη Δήλωση

The VB.Net Για κάθε πρόταση ακολουθείται η παρακάτω σύνταξη:

For Each item [ As data_type ] In group  
    [ statement(s) ]  
    [ Continue For ]  
    [ statement(s) ]  
    [ Exit For ]  
    [ statement(s) ]  
Next [ item ]

Εδώ,

• The item είναι η μεταβλητή που θα χρησιμοποιηθεί για την επανάληψη όλων των στοιχείων της συλλογής. Απαιτείται στην πρόταση For Each αλλά είναι προαιρετική στην πρόταση Next.
• The data_type είναι το Τύπος δεδομένων του στοιχείου. Απαιτείται εάν το είδος δεν είχε δηλωθεί.
• The group είναι η συλλογή στην οποία πρέπει να επαναληφθούν οι δηλώσεις. Είναι απαραίτητο.
• The statement(s) είναι προαιρετική. Υποδηλώνει είτε μία είτε περισσότερες εντολές που πρέπει να εκτελεστούν για κάθε στοιχείο στην ομάδα.
• The Continue For θα μεταφέρει τον έλεγχο στην αρχή του Για κάθε βρόχο. Είναι προαιρετικό.
• The Exit For θα μεταφέρει τον έλεγχο εκτός βρόχου For Every. Είναι προαιρετικό.
• The Next σηματοδοτεί το τέλος του βρόχου For Every. Είναι απαραίτητο.

Πώς να χρησιμοποιήσετε για κάθε βρόχο στο VB.Net

Το ακόλουθο παράδειγμα δείχνει πώς να χρησιμοποιήσετε τον βρόχο For Each στο VB.Net.

Βήμα 1) Δημιουργήστε μια νέα εφαρμογή κονσόλας.

Βήμα 2) Χρησιμοποιήστε τον ακόλουθο κωδικό:

Module Module1
    Sub Main()
        Dim myArray() As Integer = {10, 3, 12, 23, 9}
        Dim item As Integer
        For Each item In myArray
            Console.WriteLine(item)
        Next
        Console.ReadKey()
    End Sub
End Module

Βήμα 3) Κάντε κλικ στο κουμπί Έναρξη από την επάνω γραμμή για να εκτελέσετε τον κώδικα. Θα πρέπει να λάβετε το ακόλουθο αποτέλεσμα:

Εδώ είναι ένα στιγμιότυπο οθόνης του κώδικα:

Επεξήγηση του Code:

1. Δημιουργία μιας ενότητας με το όνομα Module1.
2. Έναρξη της κύριας υποδιαδικασίας.
3. Δημιουργία πίνακα με το όνομα myArray με ένα σύνολο 5 ακεραίων.
4. Δημιουργία μιας ακέραιας μεταβλητής με όνομα στοιχείου.
5. Χρησιμοποιώντας τη μεταβλητή στοιχείου για επανάληψη πάνω από τα στοιχεία του πίνακα που ονομάζεται myArray.
6. Εκτύπωση των στοιχείων που βρίσκονται στον πίνακα με την παραπάνω δήλωση στην κονσόλα.
7. Τέλος του βρόχου For Every.
8. Παύση του παραθύρου της κονσόλας για λίγη ώρα αναμονής ενός χρήστη να κάνει κάποια ενέργεια για να κλείσει το παράθυρο.
9. Λήξη της κύριας υποδιαδικασίας.
10. Τέλος της ενότητας.

Nested For Loops στο VB.Net

Ο βρόχος For Each μπορεί να είναι ένθετος. Αυτό συμβαίνει όταν τοποθετούμε έναν βρόχο For Each μέσα σε έναν άλλο βρόχο For Each. Ας το δείξουμε αυτό χρησιμοποιώντας ένα παράδειγμα.

Βήμα 1) Δημιουργήστε μια νέα εφαρμογή κονσόλας.

Βήμα 2) Χρησιμοποιήστε τον ακόλουθο κωδικό:

Module Module1
    Sub Main()
        Dim nums() As Integer = {12, 23, 35}
        Dim names() As String = {"Guru99", "alice", "antony"}
        For Each n As Integer In nums
            For Each st As String In names
                Console.Write(n.ToString & st & " ")
            Next
        Next
        Console.ReadKey()
    End Sub
End Module

Βήμα 3) Κάντε κλικ στο κουμπί Έναρξη από την επάνω γραμμή για να εκτελέσετε τον κώδικα. Θα πρέπει να λάβετε την ακόλουθη έξοδο:

Εδώ είναι ένα στιγμιότυπο οθόνης του κώδικα:

Επεξήγηση κωδικού:

1. Δημιουργία μιας ενότητας με το όνομα Module1.
2. Έναρξη της κύριας υποδιαδικασίας.
3. Δημιουργία πίνακα με όνομα nums με ένα σύνολο ακεραίων.
4. Δημιουργία πίνακα με ονόματα με ένα σύνολο ονομάτων.
5. Δημιουργία μιας μεταβλητής n και χρήση της για επανάληψη πάνω στα στοιχεία που περιέχονται στον πίνακα με το όνομα nums. Αυτός είναι ο εξωτερικός βρόχος For Every.
6. Δημιουργία μιας μεταβλητής με το όνομα st και χρήση της για επανάληψη πάνω στα στοιχεία που περιέχονται στον πίνακα με ονόματα. Αυτός είναι ο εσωτερικός βρόχος For Every.
7. Συνδυάζοντας τα στοιχεία από τους δύο πίνακες. Κάθε στοιχείο στον πίνακα αριθμών θα συνδυαστεί με κάθε στοιχείο στον πίνακα ονομάτων. Η συνάρτηση ToString μας βοηθά να μετατρέψουμε τους αριθμούς που διαβάζονται από τον πίνακα nums σε συμβολοσειρές. Το ” ” μας βοηθά να δημιουργήσουμε ένα χώρο μετά από κάθε συνδυασμό. Ο συνδυασμός έχει επιτευχθεί χρησιμοποιώντας το & (σύμπλεξο).
8. Τέλος του εσωτερικού για κάθε βρόχο.
9. Τέλος του εξωτερικού για κάθε βρόχο.
10. Παύση του παραθύρου της κονσόλας περιμένοντας ο χρήστης να προβεί σε ενέργειες για να το κλείσει.
11. Τέλος της κύριας υποδιαδικασίας.
12. Τέλος της ενότητας.

VB.Net Έξοδος για και Συνέχεια για δήλωση

Όταν χρησιμοποιείτε την πρόταση Exit For, η εκτέλεση θα αφήσει τον βρόχο For Every … Next και ο έλεγχος θα μεταφερθεί στις δηλώσεις που έρχονται μετά την εντολή Next.

Όταν χρησιμοποιείτε την πρόταση Continue For, ο έλεγχος θα μεταφερθεί στην επόμενη επανάληψη του βρόχου σας. Ας το δείξουμε αυτό χρησιμοποιώντας ένα παράδειγμα:

Βήμα 1) Ξεκινήστε δημιουργώντας μια νέα εφαρμογή κονσόλας.

Βήμα 2) Χρησιμοποιήστε τον ακόλουθο κωδικό:

Module Module1
    Sub Main()
        Dim nums() As Integer =
    {10, 12, 14, 17, 19, 23, 26, 31, 33, 37, 40, 48}
        For Each n As Integer In nums
            If n >= 17 And n <= 25 Then
                Continue For
            End If
            Console.Write(n.ToString & " ")
            If n = 37 Then
                Exit For
            End If
        Next
        Console.ReadKey()
    End Sub
End Module

Βήμα 3) Εκτελέστε τον κώδικα κάνοντας κλικ στο κουμπί Έναρξη από την επάνω γραμμή. Θα πρέπει να έχετε το ακόλουθο αποτέλεσμα:

Εδώ είναι ένα στιγμιότυπο οθόνης του κώδικα:

Επεξήγηση του Code:

1. Δημιουργία μιας ενότητας με το όνομα module1.
2. Έναρξη της κύριας υποδιαδικασίας.
3. Δημιουργία πίνακα με όνομα nums με ένα σύνολο ακεραίων.
4. Δημιουργώντας μια μεταβλητή με το όνομα n, τη χρησιμοποιούμε για να επαναλάβουμε τα στοιχεία που περιέχονται στον πίνακα nums.
5. Χρησιμοποιώντας μια συνθήκη If…Then για να ελέγξετε την τιμή της μεταβλητής n. Εάν η τιμή είναι μεταξύ 17 (συμπεριλαμβάνονται 17) και 25 (περιλαμβάνονται 25), η επανάληψη θα μεταβεί στο επόμενο στοιχείο του πίνακα.
6. Ο κάδοςping των παραπάνω τιμών γίνεται εδώ. Αυτή είναι η εντολή που είναι απαραίτητη για την εκτέλεση της παράλειψης. Αυτό σημαίνει ότι ο βρόχος For Each δεν θα εκτελεστεί για τα στοιχεία που παραλείφθηκαν.
7. Τερματίστε τη συνθήκη If.
8. Εκτύπωση των τιμών που λαμβάνονται από τον πίνακα στην κονσόλα. Η συνάρτηση ToString μας βοηθά να μετατρέψουμε τις τιμές από αριθμούς σε συμβολοσειρές. Το " " θα δημιουργήσει λίγο χώρο μετά από κάθε εκτυπωμένη τιμή.
9. Έλεγχος της μεταβλητής επανάληψης n όταν η τιμή της είναι 37 χρησιμοποιώντας μια συνθήκη Εάν… Τότε.
10. Έξοδος από τον βρόχο For Every όταν ισχύει η παραπάνω συνθήκη, δηλαδή η τιμή του n=37. Αυτό σημαίνει ότι η επανάληψη στα στοιχεία του πίνακα θα σταματήσει.
11. Τέλος της παραπάνω συνθήκης Εάν.
12. Τέλος της δήλωσης Για … Κάθε δήλωση.
13. Παύση του παραθύρου της κονσόλας περιμένοντας ο χρήστης να προβεί σε ενέργειες για να το κλείσει.
14. Λήξη της κύριας υποδιαδικασίας.
15. Τέλος της ενότητας.

Συχνές Ερωτήσεις