Perulangan Do While akan mengeksekusi aba-aba yang ada di dalamnya selama kondisi masih berlaku (True).
Sintaks:
Do While condition
statements
[condition][Exit Do]
statements
Loop
Keterangan:
condition yakni kondisi yang harus terpenuhi agar code dalam loop dikerjakan.
statements yakni arahan yang mau dihukum.
[condition][Exit Do] ialah sintaks untuk keluar dari loop jikalau memenuhi keadaan tertentu
Contoh penggunaan:
UI:
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 artikel perihal 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
EmoticonEmoticon