Show, hide Win95 taskbar

Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
　(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function ShowWindow Lib "user32" Alias "ShowWindow" _
　(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Const SW_SHOW = 5
Public Const SW_HIDE = 0
Private hwnd5 as Long
hwnd5 = FindWindow("Shell_traywnd","")
Call ShowWindow(hwnd5, SW_HIDE) '隐藏任务栏
Call ShowWindow(hwnd5, SW_SHOW) '显示任务栏This is not a good way, if you hide the taskbar but do not display it, then we only have to reboot to make it appear again, when the user finds that the taskbar can not be called, he may be very angry.