Visual Basic Transparant Taskbar

Pada artikel kali ini kita akan membahas bagaimana mengoptimalkan Windows Xp kita dengan aplikasi buatan sendiri.Tepatnya dengan menggunakan visual basic, dengan memanfaatkan atau memanggil fungsi-fungsi bawaan Windows.
Tahukah anda bahwa taskbar dan jendela aplikasi Windows XP bisa ditransparantkan? Tidak perlu membeli software seperti Windows Blinds atau lainnya untuk mentransparantkan taskbar dan jendela aplikasi pd Windows XP.
Baiklah langsung ja kita buat Apikasinya..
buatlah form1 seperti gambar dibawah ini.

Jika sudah masuk pada kode.view code pada form1 lalu masukan script dibawah ini.
Private Declare Function SetLayeredWindowAttributes Lib “user32.dll” _
(ByVal hwnd As Long, ByVal crKey As Long, _
ByVal bAlpha As Byte, _
ByVal dwFlags As Long) As Long
Private Declare Function GetWindowLong Lib “user32″ Alias “GetWindowLongA” _
(ByVal hwnd As Long, _
ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib “user32″ _
Alias “SetWindowLongA” _
(ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Private Declare Function findwindow Lib _
“user32″ _
Alias “FindWindowA” _
(ByVal lpClassname As String, _
ByVal lpWindowname As String) As Long
Private taskbarhwnd, starthwnd, stratshwnd As Long
Dim result
Dim x As Integer
Dim t As Boolean