Membuat Kotak Dengan QBasic

Pagi sobat tytanisme....

Tugas lagi dan tugas lagi, hehe, semangat!!!

Kali ini saya posting bagaimana cara membuat kotak pada QBasic dengan menggunakan prosedure.

OK.., langsung simak ja ya???

 1. Langkah pertama, buka program Qbasic, setelah itu tuliskan sub kotak.

2. Kemudian secara otomatis Anda akan diarahkan ke jendela sub kotak, ganti kode yang ada di sub   kotak dengan kode, dan sintax di bawah ini.

3. Tekan F2 untuk kembali ke jendela utama, pilih program yang paling atas, dengan cara menekan Enter. Apabila Anda belum menyimpan, maka program paling atas akan bernama "untitled", jika sudah  tersimpan maka akan muncul "nama.bas".

4. Ketikkan kode di bawah ini, untuk ukuran kolom dan baris dapat di sesuaikan menurut keinginan.

  

Ket: Untuk sintax DECLARE SUB kotak (a1,a2, b1, b2 ), tidak perlu ditulis, karena secara otomatis akan muncul apabila program telah tersimpan.

5. Tekan F5/Star > RUN. Hasilnya dapat dilihat seperti gambar di bawah ini.

Ket: Bila Anda ingin membuat kotak lagi, tinggal menulis sintax dengan perintah call kotak (baris1, baris2, kolom1, kolom2) seperti langkah no.4.

Nah.... itu langkah-lagkah membuat kotak dengan QBasic. 

Terimakasih....Semoga bermanfaat.