08 October 2015

VB.NET: Exit Do Loop


Sintaks Exit Do dapat digunakan untuk keluar dari loop (terdekat) sebelum seharus nya proses loop berakhir.

Sebagai contoh kasus perulangan terhadap nilai array yang akan berhenti jika kondisi bernilai 0. Tetapi ada pengecualian jika nilai array 10 maka iterasi akan berhenti.

Contoh penggunaan:
UI:

Code:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, _
            ByVal e As System.EventArgs) Handles MyBase.Load
        Button1.Text = "Start Loop!"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, _
            ByVal e As System.EventArgs) Handles Button1.Click


        Dim arr() As Integer = {14, 8, 9, 7, 10, 12, 13}
       
Dim i As Integer = 0
        Do While i < arr.GetUpperBound(0) + 1
            If arr(i) = 10 Then Exit Do
            ListBox1.Items.Add(arr(i))
            i += 1
        Loop


    End Sub

End Class


Runtime:

Click here if you like this article.


Baca juga artikel tentang Perulangan (Looping) lainnya:
Struktur Perulangan Do While
Struktur Perulangan Do Until
Penggunaan Exit Do
Struktur Perulangan For Next
Struktur Perulangan For Each 
Penggunaan Continue For
Penggunaan Exit For
Perulangan Tak Terhingga (Infinite Loops)

0 comments: