Visual Basic Menghilangkan Tasbar

Nah.. kita akan melanjutkan tulisan yang sebelumnya, masih bermain-main dengan taskbar namun kali ini kita akan menyembunyikan taskbar.Dengan menggunakan Aplikasi kecil yang akan kita buat kita dapat menghilangkan dan melenyapkan taskbar. Karena taskbar dalam kondisi tidak aktif atau disembunyikan, maka komputer akan sulit digunakan. Ideal jika ingin memproteksi komputer tanpa harus mematikannya.
Nah design tampilannya seperti dibawah !!

klik kanan pada form1 lalu view code, ketikan code dibawah ini.!
Private Declare Function SetWindowPos Lib “user32″ _
(ByVal hwnd As Long, ByVal hwndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib “user32″ _
Alias “FindWindowA” (ByVal IPClassname As String, ByVal lpWindowName As String) As Long
Private Declare Function GetCursorPos Lib “user32″ (lpPoint As POINTAPI) As Long
Const SWP_HIDEWINDOW = &H80
Const SWP_SHOWWINDOW = &H40
Dim TaskBarhWnd As Long
Dim P As POINTAPI
Private Type POINTAPI
X As Long
Y As Long
End Type