Bentuk pengulangan 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

Contoh Aplikasi :
Untuk menampilkan barisan bilangan 1 sampai dengan N, dengan N dimasukkan.
Hasil barisan ditampilkan pada Label.
(1) Buat project baru. Pada form, isi property [Name] dengan formLatihan51
(2) Tambahkan komponen-komponen: 1 label, 1 textbox, 1 buah listBox dan 1
command button
(3) Untuk label1, isi property [Caption] dengan ”N=”. Untuk textbox1, kosongkan property [Text]. Untuk command1, isi property [Caption] dengan Barisan. Atur posisi masing-masing komponen.

(4) Click pada command1, tambahkan program untuk membuat barisan bilangan dari 1 sampai dengan N sebagai berikut:
Private Sub Command1_Click()

N = Val(Text1)
List1.Clear
For i = 1 To N
List1.AddItem i
Next i
End Sub

Fungsi Val digunakan untuk mengubah tipe data text menjadi tipe data numerik, sedangkan fungsi Str digunakan untuk mengubah tipe data numerik menjadi tipe data text.

Property clear pada List1 digunakan untuk membersihkan isi list1, dan
property AddItem pada List1 digunakan untuk menambahkan isi list1.
Dengan demikin sebelumnya dibersihkan, kemudian ditambah isinya dengan
barisan bilangan yang dibuat.
(5) Simpan project dengan nama projectLatihan51. jalankan dan coba isi N yang
berbeda-beda, perhatikan hasilnya.

Posted in: web