Dim hWnd1 As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _ ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx _ As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Const SWP_HIDEWINDOW = &H80 Const SWP_SHOWWINDOW = &H40 'When you want to hide the Taskbar, use this code: hWnd1 = FindWindow("Shell_traywnd", "") Call SetWindowPos(hwnd1, 0, 0, 0, 0, 0, SWP_HIDEWINDOW) 'and when you want to show it again: Call SetWindowPos(hwnd1, 0, 0, 0, 0, 0, SWP_SHOWWINDOW) The Windows95 Taskbar is one of the major improvements in the Windows environment. However, sometimes your program may require it to be removed, since it sometimes does get in the way. Well, there is a solution. With this code, you can hide the Taskbar, and then when you're finished, you can show it again. Use this code: Firstly, Declare this in the General Declarations section of the Form: |