Pengertian dan Penjelasan Perulangan (Looping) di Microsoft Visual Basic 6.0

10:42 PM | Labels: Microsoft Visual Basic 6.0

Pengertian dan Penjelasan Perulangan (Looping) di Microsoft Visual Basic 6.0

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg_ViAEvrUn_-xXnIJxotcNgWKadJjJGJefFkm0I3e7QXVoaiPhdTDbnsbuCk1817z1k3tCJ32GowYe7qrw8DEWzXJdK887Dwi_1pnxOWUn6M1Qhx4Nrg61Re9UUcWfKVjTn8-qJeWbEvY/s320/About+Visual+Basic+6.0.jpg

Pengertian dan Penjelasan Perulangan (Looping) di Microsoft Visual Basic 6.0 - Struktur loop memperbolehkan anda untuk melaksanakan sekelompok baris lebih dari satu kali.

1. Do ... Loop
Gunakan Do Loop untuk mengeksekusi suatu blok statement dengan jumlah perulangan yang tak terhingga, ada beberapa Do...Loop statement, tetapi masing-masing mengevaluasi suatu kondisi untuk menentukan apakah melanjutkan eksekusi

Berikut ini adalah statement Do Loop, yang dijalankan selama kondisi benar :
Do While condition
   statements
Loop
Ketika Visual menjalankan Do Loop ini, pertama kali akan di coba
kondisinya, jika kondisi False (zero), akan diloncati semua statement yang mengikuti kondisi tersebut. Visual Basic akan menjalankan statement jika kondisi benar dan kembali ke Do…Loop berikutnya.
Function Faktorial (x)
Dim Hasil As Double
Dim Count As Long
Hasil = 1
count = 2
Do While Count <= x
   Hasil = Hasil * count
   count = count + 1
Loop
Faktorial = count
End Function

Variasi lain dari statement Do…Loop, yang menjamin minimal satu kali
statement dijalankan :
Do
   statements
Loop While condition
Dua variasi yang analog dengan dua contoh sebelumnya adalah
perulangan minimal satu kali. Dan berikut ini adalah berulang atau tidak sama sekali :
Do Until condition
   statements
Loop
Do
   statements
Loop Until condition

2. For...Next
Do Loop bekerja dengan baik, ketika anda tidak tahu berapa banyak kali untuk butuhkan untuk menjalankan statement. Ketika anda mengetahui harus menjalankan statement sejumlah kali, bagaimanapun For…Next adalah pilihan yang lebih baik. Tidak seperti Do Loop, For…Next menggunakan suatu variabel
yang disebut counter yang mana akan bertambah atau berkurang pada setiap perulangan. Syntaxnya adalah
For counter = start To end [Step increment]
    statements
Next [counter]
Argumen counter, start, end, dan increment semuanya adalah numerik.Yang
dilakukan Visual Basic ketika melakukan For Next adalah:
a) Menset nilai counter sama dengan start.
b) Mencoba apakah counter lebih besar dari end. Jika ya, Visual Basic
meninggalkan looping tersebut.
c) Menjalankan statements tersebut.
d) Menaikkan counter dengan 1 atau dengan nilai step yang ditentukan
e) Mengulangi langkah 2 sampai 4
Code berikut akan mencetak semua item yang terdapat pada suatu daftar list.
Private Sub Form_Click ()
Dim I As Integer
For i = 0 To List1.ListCount-1
Print List1.List(I)
Next
End Sub

3. While ... Wend
While – Wend digunakan untuk mengeksekusi suatu blok statement dengan jumlah perulangan yang tak terhingga. Berikut ini adalah statement While –Wend, yang dijalankan selama kondisi benar :
While condition
   statements
Wend

Ketika menjalankan While ini, pertama kali akan di coba kondisinya, jika kondisi False (zero), akan diloncati semua statement yang mengikuti kondisi tersebut. Program akan menjalankan statement jika kondisi benar dan kembali ke
While berikutnya.
Function Faktorial (x)
Dim Hasil As Double
Dim Count As Long
Hasil = 1
count = 2
While Count <= x
   Hasil = Hasil * count
   count = count + 1
Wend
Faktorial = count
End Function

Sekian Pengertian dan Penjelasan Perulangan (Looping) di Microsoft Visual Basic 6.0