VB.Net สำหรับแต่ละ...ถัดไป ออก ดำเนินการต่อคำสั่งพร้อมตัวอย่าง

VB.Net สำหรับแต่ละวง

VB.Net For Each เป็นคำสั่งแบบวนซ้ำ คุณควรใช้คำสั่งนี้เมื่อคุณต้องการทำซ้ำชุดคำสั่งสำหรับทุกรายการที่คุณมีในคอลเลกชัน คุณสามารถใช้มันเพื่อจัดการองค์ประกอบทั้งหมดที่มีอยู่ในคอลเลกชันหรืออาร์เรย์

ไวยากรณ์ของ VB.Net สำหรับแต่ละ... คำสั่งถัดไป

รางวัล VB.NET สำหรับแต่ละคำสั่งจะใช้ไวยากรณ์ที่ระบุด้านล่าง:

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

ที่นี่

• รางวัล item เป็นตัวแปรที่จะใช้เพื่อวนซ้ำรายการทั้งหมดของคอลเลกชัน ซึ่งจำเป็นในแต่ละคำสั่ง แต่เป็นทางเลือกในคำสั่ง Next
• รางวัล data_type คือ ประเภทข้อมูล ขององค์ประกอบ จำเป็นหากรายการไม่ได้รับการประกาศ
• รางวัล group คือการรวบรวมข้อความที่จะกล่าวซ้ำ มันเป็นสิ่งจำเป็น
• รางวัล statement(s) เป็นทางเลือก หมายถึงคำสั่งหนึ่งหรือหลายคำสั่งที่จะดำเนินการสำหรับทุกรายการในกลุ่ม
• รางวัล Continue For จะถ่ายโอนการควบคุมไปยังจุดเริ่มต้นของ For Each loop มันเป็นทางเลือก
• รางวัล Exit For จะถ่ายโอนการควบคุมออกจาก For Each loop มันเป็นทางเลือก
• รางวัล Next เป็นจุดสิ้นสุดของ For Each loop มันเป็นสิ่งจำเป็น

วิธีการใช้งานแต่ละลูปใน VB.Net

ตัวอย่างต่อไปนี้จะแสดงวิธีใช้ For Each Loop ใน VB.Net

ขั้นตอน 1) สร้างแอปพลิเคชันคอนโซลใหม่
เริ่มต้นด้วยการสร้างแอปพลิเคชันคอนโซลใหม่

ขั้นตอน 2) ใช้โค้ดดังต่อไปนี้
ใช้โค้ดต่อไปนี้เพื่อเรียนรู้ For Each Loop ใน VB.Net

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) คลิกปุ่มเริ่ม
คลิกปุ่ม Start จากแถบด้านบนเพื่อรันโค้ด คุณจะได้ผลลัพธ์ดังต่อไปนี้:

นี่คือภาพหน้าจอของรหัส:

คำอธิบายของรหัส:

1. การสร้างโมดูลชื่อ Module1
2. เริ่มขั้นตอนย่อยหลัก
3. การสร้างอาร์เรย์ชื่อ myArray ด้วยชุดจำนวนเต็ม 4 ตัว
4. การสร้างรายการชื่อตัวแปรจำนวนเต็ม
5. การใช้ตัวแปร item เพื่อวนซ้ำรายการของอาร์เรย์ชื่อ myArray
6. การพิมพ์รายการที่พบในอาร์เรย์ตามคำสั่งด้านบนบนคอนโซล
7. จุดสิ้นสุดของ For Each วนซ้ำ
8. การหยุดหน้าต่างคอนโซลชั่วคราวชั่วขณะหนึ่งเพื่อรอให้ผู้ใช้ดำเนินการเพื่อปิดหน้าต่าง
9. สิ้นสุดขั้นตอนย่อยหลัก
10. จุดสิ้นสุดของโมดูล

ซ้อนกันสำหรับลูปใน VB.Net

For Each loop สามารถซ้อนกันได้ สิ่งนี้จะเกิดขึ้นเมื่อเราใส่ 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) คลิกปุ่ม Start จากแถบด้านบนเพื่อรันโค้ด คุณจะได้รับผลลัพธ์ดังต่อไปนี้:

นี่คือภาพหน้าจอของรหัส:

คำอธิบายของรหัส:

1. การสร้างโมดูลชื่อ Module1
2. เริ่มขั้นตอนย่อยหลัก
3. การสร้างอาร์เรย์ชื่อ nums ด้วยชุดจำนวนเต็ม
4. การสร้างอาร์เรย์ที่มีชื่อชื่อพร้อมชุดชื่อ
5. การสร้างตัวแปร n และใช้เพื่อวนซ้ำรายการที่มีอยู่ในอาร์เรย์ชื่อ nums นี่คือด้านนอกสำหรับแต่ละวง
6. การสร้างตัวแปรชื่อ st และใช้เพื่อวนซ้ำรายการที่มีอยู่ในอาร์เรย์ชื่อชื่อ นี่คือวงในสำหรับแต่ละวง
7. การรวมรายการจากสองอาร์เรย์เข้าด้วยกัน รายการแต่ละรายการในอาร์เรย์ nums จะรวมกับแต่ละรายการในอาร์เรย์ names ฟังก์ชัน ToString ช่วยให้เราแปลงตัวเลขที่อ่านได้จากอาร์เรย์ nums เป็นสตริง เครื่องหมาย "" ช่วยให้เราสร้างช่องว่างหลังการรวมแต่ละรายการ การรวมนี้ทำได้โดยใช้เครื่องหมาย & (แอมเปอร์แซนด์)
8. ปลายด้านในสำหรับแต่ละวง
9. ปลายด้านนอกสำหรับแต่ละวง
10. หยุดหน้าต่างคอนโซลชั่วคราวเพื่อรอให้ผู้ใช้ดำเนินการเพื่อปิด
11. สิ้นสุดขั้นตอนย่อยหลัก
12. จุดสิ้นสุดของโมดูล

VB.Net ออกสำหรับและดำเนินการต่อสำหรับใบแจ้งยอด

เมื่อคุณใช้คำสั่ง Exit For การดำเนินการจะออกจากลูป For Each … 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) รันโค้ดโดยคลิกปุ่ม Start จากแถบด้านบน คุณจะได้ผลลัพธ์ดังต่อไปนี้:

นี่คือภาพหน้าจอของรหัส:

คำอธิบายของรหัส:

1. การสร้างโมดูลชื่อ module1
2. เริ่มขั้นตอนย่อยหลัก
3. การสร้างอาร์เรย์ชื่อ nums ด้วยชุดจำนวนเต็ม
4. การสร้างตัวแปรชื่อ n จากนั้นเราจะใช้มันเพื่อวนซ้ำองค์ประกอบที่มีอยู่ในหมายเลขอาร์เรย์
5. การใช้เงื่อนไข If…Then เพื่อตรวจสอบค่าของตัวแปร n หากค่าอยู่ระหว่าง 17 (รวม 17) ถึง 25 (รวม 25) การวนซ้ำจะข้ามไปยังรายการถัดไปในอาร์เรย์
6. การข้ามค่าข้างต้นเสร็จสิ้นที่นี่ นี่คือข้อความที่จำเป็นสำหรับการข้าม ซึ่งหมายความว่า For Each loop จะไม่ทำงานสำหรับรายการที่ข้าม
7. สิ้นสุดเงื่อนไข If
8. พิมพ์ค่าที่ได้จากอาร์เรย์บนคอนโซล ฟังก์ชัน ToString ช่วยให้เราแปลงค่าจากตัวเลขเป็นสตริงได้ เครื่องหมาย "" จะสร้างช่องว่างหลังค่าที่พิมพ์แต่ละค่า
9. การตรวจสอบตัวแปรการวนซ้ำ n ว่าค่าของมันคือ 37 โดยใช้เงื่อนไข If…Then
10. ออกจากลูป For Each เมื่อเงื่อนไขข้างต้นเป็นจริง นั่นคือค่า n=37 ซึ่งหมายความว่าการวนซ้ำรายการอาร์เรย์จะหยุดลง
11. สิ้นสุดเงื่อนไข If ข้างต้น
12. จุดสิ้นสุดของ For … แต่ละคำสั่ง
13. หยุดหน้าต่างคอนโซลชั่วคราวเพื่อรอให้ผู้ใช้ดำเนินการเพื่อปิด
14. สิ้นสุดขั้นตอนย่อยหลัก
15. จุดสิ้นสุดของโมดูล

สรุป

• คำสั่ง For Each ใช้เพื่อวนซ้ำทุกรายการที่มีอยู่ในคอลเลกชันหรืออาร์เรย์
• ในระหว่างการพัฒนา คุณสามารถรวมคำสั่ง For Each เข้ากับคำสั่ง Exit For และ Continue For เพื่อควบคุมวิธีการวนซ้ำ