Cara membuat mouse bandel dengan Visual Basic 06

Assalammualaikum wr.wb

Selamat memasuki bulan ramadhan dan selamat menunaikan ibada puasa semoga puasa kita di terimah oleh Allah.. aamiin..

Pada awal posting di bulan suci ini.. Debian akan coba menshare cara membuat aplikasi sederhana menggunakan Visual basic.. aplikasi sederhana yaitu namanya,, Mouse bandel hehehe asal ceplok aje… kan kreasi sendiri..

Ok lanjut ke pembahasan.. pertama siapkan dulu bahan- bahan yang akan di buat..

1. 2 buah command button  
2. 1 buah Timer
3. 1 buah module
   Seteelah semua sudah siap kita setting propertinya
   
   1. Command1 = Caption : Play
   2. Command 1 = Caption : Stop
   3. Timer = Interval : 1000

Buat Tampilan seperti berikut sebagai contoh..

Pada command button 1 atau pada button play klik double 2X dan isikan script berikut atau copas script dibawah ini

Timer1.Enabled = False

Maka hasilnya akan seperti ini

Private Sub Command1_Click()

Timer1.Enabled = False

End Sub

Kemudian klik 2x pada button stop dan isikan script berikut

Timer1.Enabled = True

Maka hasilnya akan seperti ini

Private Sub Command2_Click()

Timer1.Enabled = True

End Sub

Kemudian kita klik double 2X lagi pada button Timer dan isikan script berikut

X = 1 + 2 + 3 + 4 + 5 + 6 - 2

Y = 1 + 2 * 800 + 200 - 400 + 130 + 700

SetCursorPos X, Y

Maka hasilnya seperti ini

Private Sub Timer1_Timer()

X = 1 + 2 + 3 + 4 + 5 + 6 - 2

Y = 1 + 2 * 800 + 200 - 400 + 130 + 700

SetCursorPos X, Y

End Sub

Kemudian sekarang kita buat module caranya klik kanan pada atas property bawah folder project dan form, pilih  Add module

Sekarang kita isikan script berikut pada module

Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long

Silakan cek hasilnya dengan menekan  F5

NB : perlu di ketahui untuk mematikannya kita harus cepat-cepat tekan tombol Stop atau kita bisa mematikan lwat task manager..

Dan mohon gunakan sebagai pembelajaran saja jangan gunakan untuk mengerjai orang lain..

Hanya itu yang bisa Debian sampaikan.. semoga bermanfaat..

Dan jika sobat masih bingung juga sobat bisa ambil sourcodenya atau project di bawah ini

download