Implementasi Perintah Perulangan di VB6 dan Contoh

#1 Implementasi Perintah Perulangan

• Perulangan For-next

Dalam beberapa situasi dimana kamu hanya sekedar ingin menjalankan sebuah perulangan dengan jumlah perulangan yang sudah di defenisikan sebelumnya. Dengan Perulangan For-next hal itu akan bisa dilakukan. Dengan jenis perulangan ini kamu dapat menentukan jumlah sebuah perulangan. dan akan exit ketika jumlah perulangan sudah tercapai.

Syntaxnya seperti dibawah ini :

Dim I AS Integer

For I = (Integer) to (Integer)
 (Code to Execute)
Next I

Kami menggunakan nama Variabel "I" pada program diatas, namun kamu bebas menentukan nama varibel yang kamu inginkan.

• Perulangan Do While

Syntaxnya seperti dibawah ini :

Do While (Expression)
 (Code to Execute)
Loop

• Perulangan While Wend

Syntaxnya seperti dibawah ini :

While (Expression)
 (Code to Execute)
Wend


#2 Contoh Sederhana

Untuk Menampilan number dari 1 sampai 50 mengunakan perulangan For

Syntaxnya :

Private Sub Command1_Click()

Dim I As Integer

For I = 1 To 50

Label1 = Label1 + Str(I)

Next I

End Sub