Perulangan dengan DO While … LOOP di Vb.Net

Perulangan yang ketiga yang dapat digunakan dalam pemograman vb.net yaitu perulangan yang dinamakan dengan perulangan Do While..Loop. Do While melakukan perulangan selama kondisi memenuhi syarat.

format penulisan:

DO While (kondisi)
[perintah1]
[Exit Do]
[perintah2]
LOOP

Sebagai Contoh silahkan buatlah projek baru dan beri nama dengan “perulangan_dowhile_loop”, kemudian atur design tampilan seperti gambar berikut.

Pada design form diatas komponen yang digunakan yaitu hanya satu buah labael, combobox dan button. Silahkan double klik pada button1, Kemudian ketikan dan sesuaikan listing program seperti berikut.

Public Class Form1
Dim a As Integer = 10
Dim b As Integer = 1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Do While b <= a
ComboBox1.Items.Add(b)
b = b + 1
Loop
End Sub
End Class
Pada akhirnya program sudah selesai dibuat , silakan jalankan jika berhasil maka aplikasi akan berjalan seperti gambar dibawah.