Forum Informatika

Tutorial ini dibuat untuk kalangan pemula alias beginner.
Yaitu bagaimana kita membuat tulisan2 di atas form tanpa menggunakan komponen2 apapun dalam VB6.

Hal pertama yang harus kita atur adalah properti AutoRedraw.

Agar penulisan di atas form bisa langsung diterapkan, jangan lupa di jendela Properties, tentukan AutoRedraw = True.

Berikutnya, penulisan di form akan dilakukan setelah form pertama kali di-load atau dipanggil atau aktif.
Berarti setiap perintah harus berada dalam prosedur Form Load

Caranya, ketika Anda pertama kali membuka jendela VB6, silakan dobel klik di form yang sedang aktif.
Berikutnya akan dimunculkan jendela untuk pengkodean dengan kerangka sebagai berikut:

Private Sub Form_Load()

End Sub
Nah, di antara tulisan Private Sub Form_Load() dan End Sub, di situlah perintah2 yang Anda tuliskan akan dikerjakan setelah jendela form aktif.

Untuk menulis di atas form, maka dapat digunakan perintah Print

Untuk menulis kalimat dengan tipe data string atau kumpulan karakter, maka ditulis di antara tanda kutip, contoh:

Print "Halo, Forum Informatika"
Print "Belajar Visual Basic 6 di http:/if.web.id"
Print
Setelah perintah Print tanpa diikuti karakter apapun akan menjadi sebuah baris kosong.

Untuk menuliskan operasi matematika pun bisa dilakukan dengan cara, misal:

Print 1+1
Print 4/6

Ingat, tanpa diapit dalam tanda kutip. Kalau diapit dalam tanda kutip, nanti akan muncul sebagaimana string atau kalimat biasa, bukan sebuah operasi matematika.

Contoh lain adalah pengulangan menggunakan FOR .. NEXT

For i=1 to 10
     Print i
Next
Dalam contoh di atas sudah jelas bahw kita akan mencetak angka 1 sampai 10, dimana tersimpan dalam variabel i.

Sebagai tambahan, variabel i di sini tidak perlu dideklarasikan terlebih dahulu, baik itu tipe datanya maupun isi atau nilai awalnya.

Berikut contoh lengkap kodenya:

Private Sub Form_Load()
Print "Halo, Forum Informatika"
Print "Belajar Visual Basic 6 di http:/if.web.id"
Print
Print "Menampilkan hasil 4/6"
Print 4 / 6
Print
Print "1 + 1 = " & (1 + 1)
Print
Print "Mengulang angka 1 - 10"
For i=1 to 10
     Print i
Next
End Sub
Hasilnya akan nampak seperti pada gambar berikut: