26 | 02 | 2017

Show/Hide Taskbar

Toggle between taskbar status. Use Showtskbr True and Showtskbr False to show or hide the taskbar.

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
 
 
 
 
Login

Sign up now and upload your code to the website.

Help us to continue.....
Statistics
Articles View Hits
2179696
Latest Articles