Struktur loop memperbolehkan anda
untuk melaksanakan sekelompok baris lebih dari satu kali.
·
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
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
·
For ….. Next
Tidak seperti Do
Loop, For…Next menggunakan suatu variabel
yang disebut counter yang mana akan bertambah atau berkurang pada setiap perulangan. Syntaxnya adalah
yang disebut counter yang mana akan bertambah atau berkurang pada setiap perulangan. Syntaxnya adalah
For counter =
start To end [Step increment]
statements
Next [counter]
statements
Next [counter]
·
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
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.
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
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
sumber: http://newbie-programer.blogspot.com/2012/03/pengertian-dan-penjelasan-perulangan.html
Tidak ada komentar:
Posting Komentar