Pengulangan
Dengan While…Wend
Pengulangan dengan While...
Wend adalah bentuk pengulangan terkendali dengan proses akan diulang selama
kondisi yang diberikan masih dipenuhi. Format penulisan pengulangan ini adalah:
While
Wend
Contoh ;
Menampilkan bilangan bulat
ganjil dari 1 sampai dengan 17, ini merupakan looping dengan akumulator yang
dapat dituliskan sebagai berikut:
Bilangan = 1
While bilangan <= 17
List1.AddItem bilangan
bilangan = bilangan + 2
Wend
Bilangan
=1 (adalah bilangan awal), dan bilangan + 2 (bilangan awal + 2 ) karena 2 itu
bilangan tetap. Dan 1+2=3, hasil akhir di tambah lagi dengan 2,
3+2=5,
5+2=7…15+2=17
Print Out
Pengulangan Dengan For…Next
Pengulangan
proses menggunakan For…Next adalah bentuk pengulangan terkendali dengan
variabel kendali yang terus berjalan maju atau mundur. Format penulisan
pengulangan ini adalah sebagai berikut:
For variabel = nilai_awal To
nilai_akhir [Step langkah]
Next variable
Contoh ;
Untuk
menentukan barisan bilangan 1, 2, 3, …., 10 maka bilangan mempunyai nilai awal
= 1, nilai akhir=10 dan step antar bilangan = 1, sehingga bisa ditulis dengan ;
For bilangan=1 To 10 Step 1
Next bilangan
Karena
step=1, maka secara default tidak perlu dituliskan sehingga perintahnya bias
ditulis dengan:
For bilangan=1 To 10
Next bilangan
Print Out
Jadi step awal itu adalah bilangan 1, 1 * 1(bilangan tetapnya)
= 1 dan step selanjutnya adalah 2 , 2*1=2..dan seterusnya pada akhirnya sampai
dengan 10.
Pengulangan
Dengan Do Loop Until
Pengulangan
dengan Do Loop Until adalah bentuk pengulangan terkendali dengan proses akan
diulang sampai kondisi yang diberikan dipenuhi. Format penulisan pengulangan
ini adalah:
Do
Loop Until
Contoh ;
Menampilkan
bilangan bulat ganjil dari satu sampai dengan 9, ini merupakan looping dengan
akumulator yang dapat dituliskan sebagai berikut:
bilangan=1
do
List1.AddItem bilangan
bilangan = bilangan + 2
Loop until bilangan>9