nicht in TaskManager VB

[LastPigStanding]

Wie kann i das in VB machen dass das Prog im TaskManager nicht auftaucht?

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessId As Long, ByVal dwType As Long) As Long

Function Sichtbar_in_TaskListe()
On Error GoTo z
    Dim p As Long
    Dim x As Integer
    x = 1
    p = GetCurrentProcessId()
    regserv = RegisterServiceProcess(p, x)
z:
End Function

hab i schon verwendet.