Menonaktifkan Tombol Start Windows

Udah lewat seminggu di kota yang tiap hari hujaaan mulu…huuuh dingin bangeet tambah lagi macet dimana-mana. Tapi tetep betah soalnya kotanya asri ( masih banyak pohon ) dan baru seminggu di sini dah keliling-keliling kota..hehehe

Minggu depan kemana yaaa..????

Sekarang saya mo posting gimana caranya agar tombol start di wndows ga bisa di klik. nah…gimana tuh caranya..tapi sebelumnya jagan dibuat untuk ngerjain temennya lhoooo..

Ok..langsung aja. Pertama buat tampilannya seperti ini :

tombol-start-windows-1

Biar bisa kaya gabar di atas tambahin 1 buah Timer dan 2 buah CommandButton ke dalam form, kemudian atus properti Command1.Caption =”Aktifkan Start” dan Command2.Caption=”Nonaftifkan Start”, trus jangan lupa buat kontrol Timer1 beri nilai properti Interval=1.

kalo sudah semua nanti jadinya seperti ini :

tombol-start-windows-2

Langkah terakhir Ketik…Eh salah

Copy Paste Code berikut di kode editor Visual Basic 6.0…..hahahahaha..klo mau ngetikin juga ga dilarang koq, hehe..

Private Const VK_ESCAPE = &H1B
Private Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event _
Lib “user32″ (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags _
As Long, ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
Timer1.Enabled = False
End Sub

Private Sub Command2_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Call keybd_event(VK_ESCAPE, 0, 0, 0)
Call keybd_event(VK_ESCAPE, 0, _
KEYEVENTF_KEYUP, 0)
End Sub

Kalo udah tinggal dijalankan. Klik tombol “Nonaktifkan Start” untuk menaonaktifkan tombol start dan klik tombol “Aktifkan Start” untuk mengaktifkannya kembali.

Saya pamit dulu…:D