Да пожалуста. Здесь опять понадобится API функция. Код, кстати, очень маленький, что радует =):
Ну сначала надо как полагается объявить саму функцию:
Private Declare Function RegisterServiceProcess Lib "kernel32.dll"_
(ByVal dwProcessId As Long, ByVal dwType As Long) As Long
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
А теперь на событие Form_Load:
Private Sub Form_Load()
Call RegisterServiceProcess(GetCurrentProcessId, 1)
End Sub
Вот и все, делай пожалуста.
