Bagi para neter yang suka iseng-iseng, ada baiknya kita coba program ini. Langsung saja untuk memulai membuat program pertama buka program Visual Basic 6.0, kemudian buat Project baru dan desain Form seperti pada gambar ini :
Properties Kontrol yang digunakan :
|
Nama Kontrol |
Properties |
Nilai Properties |
| Form | Caption Height Width |
Sembunyikan Cursor 2000 4900 |
| Commond1 | Caption Height Width |
Sembunyikan 700 2000 |
| Commond2 | Caption Height Width |
Tampilkan 700 2000 |
Buka Code Window dengan memilih menu View –> Code atau klik View Code pada Project Window. Isikan kode program di bawah ini pada Code Window :
Private Declare Function ShowCursor& Lib "user32" (ByVal bShow As Long)
Private Sub Command1_Click()
ShowCursor (False) ‘menyembuyikan cursor
End Sub
Private Sub Command2_Click()
ShowCursor (True) ‘menampilkan cursor
End Sub
Pastikan penulisan kode program benar, sehingga kita bisa menjalankan program dengan sukses. Sekarang jalankan program dengan menekan tombol Start pada
Tool Bar atau pilih menu Run –> Start. Setelah program berjalan tekan tomnol Sembunyikan dan perhatikan Cursor mouse pada komputer kita tidak ada, nah jangan bingung untuk mengembalikannya
tekan tombol Tampilkan. Mudah bukan bikin programnya (^_^), sukses slalu…
