21 | 08 | 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
        ShowWindow hWnd_StartBar, SW_HIDE
    End If
End Sub

Sign up now and upload your code to the website.

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