Why don't you just hide the taskbar?
Code:
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_HIDE = 0
Public Const SW_SHOW = 5
'Hide
Dim tray&
tray& = findwindow("Shell_TrayWnd", vbNullString)
X = showWindow(tray&, SW_HIDE)
'Show
Dim tray&
tray& = findwindow("Shell_TrayWnd", vbNullString)
X = showWindow(tray&, SW_SHOW)