VB.Net Iga…Järgmine, Välju, Jätka lause

VB.Net iga loopi jaoks

VB.Net Igaühe jaoks on tualettruumping lause. Seda lauset peaksite kasutama siis, kui peate iga kollektsioonis oleva elemendi jaoks kordama lausete komplekti. Saate seda kasutada kõigi kollektsioonis või massiivis sisalduvate elementide manipuleerimiseks.

VB.Neti süntaks igale… Järgmine avaldus

. VB.Net Iga lause puhul kasutatakse allpool toodud süntaksit:

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

Siin

• . item on muutuja, mida kasutatakse kollektsiooni kõigi üksuste läbivaatamiseks. See on kohustuslik For Each lauses, kuid valikuline Next lauses.
• . data_type on andmetüüp elemendist. See on nõutav, kui kaup ei olnud deklareeritud.
• . group on kogum, mille üle väiteid korrata. See on nõutav.
• . statement(s) on valikuline. See tähistab ühte või mitut avaldust, mis tuleb täita iga rühma üksuse jaoks.
• . Continue For viib juhtimise üle iga tsükli algusesse. See on valikuline.
• . Exit For teisaldab iga ahela juhtimise välja. See on valikuline.
• . Next tähistab tsükli For Every lõppu. See on nõutav.

Kuidas kasutada VB.Neti iga tsükli jaoks

Järgnev näide demonstreerib, kuidas kasutada VB.Netis tsüklit For Each.

Step 1) Looge uus konsoolirakendus.

Step 2) Kasutage järgmist koodi:

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

Step 3) Koodi käivitamiseks klõpsake ülemisel ribal nuppu Start. Peaksite saama järgmise tulemuse:

Siin on koodi ekraanipilt:

Selgitus Code:

1. Mooduli Module1 loomine.
2. Peamise alamprotseduuri alustamine.
3. Massiivi loomine nimega myArray 5 täisarvuga.
4. Täisarvulise muutuja nimega üksus loomine.
5. Üksuse muutuja kasutamine massiivi nimega myArray üksuste itereerimiseks.
6. Massiivist leitud üksuste printimine konsooli ülaltoodud avalduse järgi.
7. Iga silmuse lõpp.
8. Konsooliakna peatamine mõneks ajaks, oodates, kuni kasutaja akna sulgemiseks midagi ette võtab.
9. Peamise alamprotseduuri lõpp.
10. Mooduli lõpp.

Pesastatud VB.Neti silmustele

For Each tsüklit saab pesastada. See juhtub siis, kui paneme ühe For Each tsükli teise For Each tsükli sisse. Demonstreerime seda näite abil.

Step 1) Looge uus konsoolirakendus.

Step 2) Kasutage järgmist koodi:

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

Step 3) Koodi käivitamiseks klõpsake ülemisel ribal nuppu Start. Peaksite saama järgmise väljundi:

Siin on koodi ekraanipilt:

Koodi selgitus:

1. Mooduli Module1 loomine.
2. Peamise alamprotseduuri alustamine.
3. Massiivi loomine nimega nums koos täisarvude komplektiga.
4. Massiivi loomine nimedega nimede komplektiga.
5. Muutuja n loomine ja selle kasutamine massiivi nums sisalduvate üksuste itereerimiseks. See on välimine iga silmus.
6. Muutuja nimega st loomine ja selle kasutamine massiivi nimega nimega üksuste itereerimiseks. See on sisemine iga silmus.
7. Kahe massiivi üksuste kombineerimine. Iga üksus nums-massiivis kombineeritakse iga nimede massiivi üksusega. Funktsioon ToString aitab meil nums-massiivist loetud arvud stringideks teisendada. " " aitab meil iga kombinatsiooni järel tühiku luua. Kombinatsioon on saavutatud kasutades & (ampersand).
8. Sisemise lõpp Iga silmuse jaoks.
9. Välise iga silmuse lõpp.
10. Peatage konsooliaken, oodates, kuni kasutaja selle sulgemiseks midagi ette võtab.
11. Peamise alamprotseduuri lõpp.
12. Mooduli lõpp.

VB.Net Välju ja jätka avalduse jaoks

Kui kasutate lauset Exit For, lahkub täitmine tsüklist For Every … Next ja juhtimine kantakse üle lausetele, mis tulevad pärast lauset Next.

Kui kasutate lauset Continue For, kantakse juhtimine üle teie tsükli järgmisele iteratsioonile. Näitame seda näite abil:

Step 1) Alustage uue konsoolirakenduse loomisega.

Step 2) Kasutage järgmist koodi:

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

Step 3) Käivitage kood, klõpsates ülemisel ribal nuppu Start. Peaksite saama järgmise tulemuse:

Siin on koodi ekraanipilt:

Selgitus Code:

1. Mooduli loomine nimega moodul1.
2. Peamise alamprotseduuri alustamine.
3. Massiivi loomine nimega nums koos täisarvude komplektiga.
4. Luues muutuja nimega n, siis kasutame seda massiivi numbrites sisalduvate elementide itereerimiseks.
5. Kasutades tingimust If…Then, et kontrollida muutuja n väärtust. Kui väärtus on vahemikus 17 (kaasa arvatud 17) kuni 25 (kaasa arvatud 25), liigub iteratsioon massiivi järgmise üksuse juurde.
6. Hüppaping Ülaltoodud väärtuste muutmine toimub siin. See on vahelejätmiseks vajalik lause. See tähendab, et vahelejäetud üksuste puhul tsüklit For Each ei käivitata.
7. Lõpetage tingimus Kui.
8. Massiivist saadud väärtuste trükkimine konsoolile. Funktsioon ToString aitab meil väärtused numbritest stringideks teisendada. " " loob iga prinditud väärtuse järel tühiku.
9. Iteratsioonimuutuja n kontrollimine, kui selle väärtus on 37, kasutades tingimust If…Then.
10. Iga tsüklist väljumine, kui ülaltoodud tingimus on tõene, st väärtus n=37. See tähendab, et massiivi üksuste iteratsioon peatub.
11. Ülaltoodud If tingimuse lõpp.
12. Lõpp For … Iga väide.
13. Peatage konsooliaken, oodates, kuni kasutaja selle sulgemiseks midagi ette võtab.
14. Peamise alamprotseduuri lõpp.
15. Mooduli lõpp.

KKK