PERULANGAN MENGGUNAKAN DO WHILE...LOOP

Saya akan melanjutkan penjelasan mengenai bahasa pemrograman VB. Pada kesempatan kali ini menjelaskan tentang kondisi perulangan khususnya kondisi perulangan Do While..Loop pada VB dengan output bilangan asli namun angka 6 tidak akan tercetak pada output, pada program ini saya menggunakan Microsoft Visual Basic 6.0. Berikut adalah caranya :

1. Pertama-tama kalian harus menginstall aplikasi Visual Basic 6.0 pada laptop atau komputer kalian.

2. Setelah menginstall aplikasi tersebut, kalian langsung saja buka ketampilan awal VB 6.0 pada laptop atau komputer kalian.

3. Setelah klik open, lalu akan muncul kertas kerja seperti gambar di bawah :

4. Selanjutnya buat program seperti desain dibawah ini :

NAMA CONTROL	PROPERTY	VALUE
Label 1	Text	PROGRAM PERULANGAN
Label 2	Text	Masukan Batasan Nilai
Label 3	Text	Keterangan : Nilai awal = 1
TextBox1	-	-
Command1	Text	LOOP
Command2	Text	CLEAR
Command3	Text	EXIT
ListBox1	-	-

5. Selanjutnya kita masukan kode program pada Command Button 1 “LOOP”. Command Button 2 "Clear", Command Button 3 "EXIT" dengan cara klik dua kali pada CommandButton 1 "LOOP", Command Button 2 "Clear", Command Button 3 "EXIT" dan masukan kode program seperti berikut :

6. Setelah memasukkan kode program tersebut, langkah selanjutnya adalah run program tersebut, seperti gambar dibawah ini :

masukkan angka, contohnya = 20, seperti gambar diatas.

Jika ingin memasukan angka yang lain klik "CLEAR" maka kolom text akan kembali kosong, seperti gambar diatas. 

Jika ingin mengakhiri run program klik "EXIT" maka akan muncul gambar seperti diatas.

7. Setelah semua program berhasil di running dan tidak ada kesalahan, jangan lupa untuk di save from dan project kalian yaa...

Saya kira sudah cukup jelas penjelasan mengenai kondisi perulangan (Do While..Loop) pada VB 6.0, semoga postingan ini bermanfaat dan menambah pengetahuan bagi kita dalam memahami bahasa pemrograman VB.