Ejecutar programa en segundo plano...

en Form_load
Me. Hide
Declarar en un módulo:
Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Public Declare Function GetCurrentProcess Lib "kernel32" () As Long
Public Declare Function RegisterServiceProcess Lib "kernel32" _
(ByVal dwProcessID As Long, ByVal dwType As Long) As Long
Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0
Meter en un Form y ejecutar la funcion que se precise:
Private Sub nover()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub
Private Sub ver()
Dim pid As Long
Dim reserv As Long
pid = GetCurrentProcessId()
regserv = RegisterServiceProcess(pid, _
RSP_UNREGISTER_SERVICE)
End Sub
Es lo mejor que existe para colocarlo en segundo plano
Un placer,
Dragonice

Me marca un error al ejecutar...
Error '453' en tiempo de ejecución:
No se puede encontrar el punto de entrada de la DLL RegisterServiceProcess en Kernel32
¿A qué se deberá?
Espero puedas ayudarme