Visual Basic - ventana con el control total

Hola a todos. Tengo una duda. en vb6 como puedo crear una ventana que tenga el control total del ordenador. es decir, cuando ejecutamos un programa con vb y aparece la ventana, al teclear la tecla de windows se activa la barra de tareas. necesito hacer un programa que desactive esto, será un programa que actúe como un password en una red local.
le agradeceré su ayuda.

Lo que neceitás hacer es utilizar una API llamada SySTEMPARAMETERINFO
y lo que hace especificmaente es simular la ejecución de un screensaver, deshabilitando las teclas Ctl-Alt-Del, Win, Ctl-Esc y Alt-Tab

Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

y ejecutar desde una función como:

Private Sub DisableCtrlAltDelete(bDisabled As Boolean)
' bDisabled es True o False
'Inhabilita las teclas Control Alt Delete y Ctrl-Escape _
usando las API's de Windows
Dim X As Long
X = SystemParametersInfo(97, bDisabled, CStr(1), 0)
End Sub

Y además Ocultar la barra de tareas:

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

Private Const SWP_HIDEWINDOW = &H80
Private Const SWP_SHOWWINDOW = &H40

Public Function Ocultar_Barra_de_Tareas() As Boolean
Dim lRet As Long
lRet = FindWindow("Shell_traywnd", "") 'Busca el handle
If lRet > 0 Then ' si lo encuentra lo oculta
lRet = SetWindowPos(lRet, 0, 0, 0, 0, 0, SWP_HIDEWINDOW)
HideTaskBar = lRet > 0
End If
End Function

Public Function M