Perulangan Do While akan mengeksekusi kode yang ada di dalamnya selama kondisi masih berlaku (True). Sintaks: Do While condition statements [ condition ][Exit Do] statements Loop Keterangan: condition adalah kondisi yang harus terpenuhi agar code dalam loop dijalankan. statements adalah kode yang akan dieksekusi. [ condition ][Exit Do] adalah sintaks untuk keluar dari loop jika memenuhi kondisi tertentu 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 arrNumber() As Integer = 1, 5, 7, 9, 12, 24, 48 Dim iCount As Integer = arrNumber.GetUpperBound(0) + 1 Do While iCount > 0 iCount -= 1 ListBox1.Items.Add(arrNumber(iCount)) Loop End Sub End Class Runtime: Click here if you like this article. Baca juga postingan wacana 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) Sumber http://rani-irsan.blogspot.com