Perulangan for, while, until visual basic 2008

Perulangan adalah, proses yang dieksekusi secara berulang-ulang. Maksudnya adalah kode perulangan yang berfungsi untuk mengulangi kode-kode yang lain sebanyak yang di butuhkan.

Buat perancangan form seperti di bawah ini :

Program perulangan For, While, do while, do until :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim i As Integer = 0
        For i = 1 To 10
            Me.ListBox1.Items.Add("For ke-" & i)
        Next

        i = 0
        While i < 10
            i += 1
            Me.ListBox2.Items.Add("While ke-" & i)
        End While

        i = 0
        Do
            i += 1
            Me.ListBox3.Items.Add("DoUntil ke-" & i)
        Loop Until i = 10

        i = 0
        Do
            i += 1
            Me.ListBox3.Items.Add("DoWhile ke-" & i)
        Loop While i < 10
    End Sub
End Class

Hasil :