Sintaks Exit Do mampu dipakai untuk keluar dari loop (terdekat) sebelum seharus nya proses loop rampung. Sebagai acuan kasus perulangan kepada nilai array yang akan berhenti jika keadaan bernilai 0. Tetapi ada pengecualian kalau 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 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 wacana Perulangan (Looping) yang lain: 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) Sumber http://rani-irsan.blogspot.com