| Show/Hide Taskbar |
 |
 |
 |
| Tutorials | |||||||||||
| Written by Administrator | |||||||||||
|
Toggle between taskbar status. Use Showtskbr True and Showtskbr False to show or hide the taskbar. [code] Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Const SW_HIDE = 0
Private Const SW_SHOW = 5
Sub ShowTskbr(ByVal bVisible As Boolean)
Dim hWnd_StartBar As Long
hWnd_StartBar = FindWindow("Shell_TrayWnd", "")
If bVisible Then
ShowWindow hWnd_StartBar, SW_SHOW
Else
ShowWindow hWnd_StartBar, SW_HIDE
End If
End Sub
[/code]
|
