Perulangan menggunakan Visual Studio 2010

Dalam pemrograman siapa yang tidak mengenal istilah perulangan? Pasti semua sudah tidak asing lagi. Nah kali ini kita menggunakan perulangan while sebagai contoh.

1.       Yang pertama kita buat adala project baru dan formnya.

2.       Lalu kita desain form seperti berikut :

(gunakan Label, TextBox, Button, dan ListBox)

1.       Klik dua kali pada button, dan ketikkan kode berikut :

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

        Dim angka_awal, angka_akhir As Integer

        angka_awal = TextBox1.Text

        angka_akhir = TextBox2.Text

        ListBox1.Items.Clear()

        While angka_awal < (angka_akhir + 1)

            ListBox1.Items.Add(angka_awal)

            angka_awal = angka_awal + 1

        End While

    End Sub

2.  Berikut tampilan setelah program dijalankan :

p

PPada aplikasi diatas merupakan perulangan sederhananya. Semoga bermanfaat dan dapat membantu.