Como esconder o botão iniciar?

[spilin182]

Boa tarde pessoal. Possuo um código para esconder a barra de tarefas, porém o botão iniciar insiste em aparecer. alguém conhece algum código para que além da barra de tarefas o botão iniciar também

desapareça?

Segue o código usando API para esconder a barra de tarefas:

`Módulo

Option Explicit

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Public 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

Public Const SWP_HIDEWINDOW As Long = &H80

Public Const SWP_SHOWWINDOW As Long = &H40

Public lRet As Long

código:

'Esconde a barra de tarefas

lRet = FindWindow("Shell_traywnd", "")

Call SetWindowPos(lRet, 0, 0, 0, 0, 0, SWP_HIDEWINDOW)

Como disse, este código esconde a barra de tarefas mas não o botão iniciar.

Grato.