PENGULANGAN MENGGUNAKAN WHILE..WEND, FOR..NEXT, DAN DO LOOP

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