Menentukan Barisan Bilangan Dengan Fungsi For Dan Next

Di tutorial sebelumnya aku telah membahas mengenai fungsi dari percabangan For dan Next, Pada tutorial kali ini kita akan menciptakan kegiatan sederhana yang berkaitan dengan for dan next, sengaja aku buatkan kegiatan ini, biar anda yang sedang berguru VB, terutama mengenai fungsi For dan Next, biar anda dapat lebih memahaminya, untuk progam pertama yang akan aku jelaskan untuk fungsi ini, yakni memilih barisan bilangan dengan pola / interval maju (bertambah) dan mundur (Berkurang), oke berikut tutorialnya :

1. Seperti biasa, jalankan VB dengan project Standar EXE
2. kemudian tambahkan 2 label, 2 text box, 1 command button dan 1 list box, dan atur tampilannya, misalnya menyerupai ini :

3. Lalu ubah Propertienya, namun disini aku hanya merubah caption / textnya saja, untuk properties lainya, silahkan sesuai kreatifitas anda masing masing.
Tool BoxPropertiesKeterangan
Label 1CAPTIONNilai Awal
Label 2Nilai Akhir
Command 1Lihat Barisan
Text 1TextKosong
Text 2
Sehingga menyerupai ini :

4. Setelah itu, tuliskan script berikut :

Private Sub Command1_Click()
awal = Val(Text1) 'Nilai dari text 1 akan di simpan di memori dengan nama awal
akhir = Val(Text2)
List1.Clear 'List 1 dalam keadaan higienis / kosong
For barisan = awal To tamat Step 1 'Barisan yakni dari awal hingga akhir
List1.AddItem barisan 'Setiap nilai yang ada di barisan akan di tambahkan di List 1
Next barisan
End Sub
Catatan :
Script diatas, yakni script untuk pola maju dengan pertambahan 1, untuk pola mundur silahkan ganti Step 1 dengan Step -1 atau dengan angka lainya,
Jika ingin barisan bilangan hanya untuk bilangan ganjil dan genap, ganti saja angka 1 menjadi 2.
dan kalau anda ingin barisan bilangan menurut kelipatan, ganti saja angka 1 dengan kelipatan yang di inginkan.
5. Setelah itu silahkan jalankan programnya.
Pola Maju
Pola Mundur
Itualah kegiatan sederhana untuk mengaplikasikan fungsi For dan Next, untuk tutorial selanjutnya masih dengan tema yang sama (Fungsi for dan next) akan aku bahas cara untuk Menuliskan Huruf dari A Sampai Z Secara Otomatis
Sekian tutorial kali ini, selamat mencoba
Terimakasih

Comments