Program Sederhana Visual Basic 6.0 Menggunakan Perintah Do While Loop

LANGKAH-LANGKAH MEMBUAT PROGRAM

1.buka aplikasi visual basic dan pilih stardar exe dengan double klik
2. akan muncul from 1, kalau kalian ingin mengubah warna, background,font dan tampilan lainnya dapat disesuaikan pada tampilan property di pojok kanan.
3. kemudian membuat desain form utnuk program, seperti pada tabel dibawah

Object	property	value
Label 1 Label 2	Caption Captiom	DO WHILE LOOP Masukkan data
Textbox	Text Name	- -
Commandbutton 1 Commandbutton 2	Caption Caption	LOOP CLEAR
Listbox	-	-

4    4. Kemudian klik commandbutton untuk membuat code tersebut 

 lalu kita klik commandbutton 2 untuk kode pada gambar diatas.

5. Kemudian kalau sudah kalian kilik run lalu start

jalankan programnya dengan memasukkan angka di text 1dari 1-25  maka listbox  akan muncul angka yang anda inginkan, jika anda keluar dari angka 25 sampai angka keatas anda akan mendapatkan false lalu mau menghapus klik clear dan klik end untuk mengakhiri program 

6. Kalau program sudah benar kalian "save program" dengan klik file lalu save project kalian buat folder yang kalian ingin simpan.

 

 pada gambar diatas adalah program do while loop kondisi false 

 

pada gambar diatas adalah program do while loop kondisi true 

Penjelasan pada code programnya :

List1.clear : untuk semua isi object list1 akan dihapus

I = val(text1.text) : digunakan dalam untuk menkonversi (mengubah ) nilai string (huruf) ke nilai numeric (angka) yang dimaksudkan nilai awal yang diinput.

Do : Untuk membuat pernyataan do-while diawali dengan kaya kunci do dan setelah itu diikuti dengan penulisan pernyataan sebagai perintah yang dapat dilakukan oleh CPU

List1.additem “antrian “ & 1 : method ini akan menambah isi argument yang diberikan pada beberapa tulisan. Seperti “antrian “ & 1 : ini adalah argument yang akan diisi kedalam object list1.

I = i + 3 : menunjukan nilai i yang ditambahkan dengan 3

Loop while <= 25 : kondisi input <= 25 false, statement tidak dicetak.

flowchart program :