Visual Basic - Recuperar el nombre del servicio donde se ejecuta

Hemos creado un programa eb VB para rodar bajo un servicio de NT. Debemos arrancar mas de un servicio en paralelo y cada uno con un nombre diferente. Aunque en fase de Init le cambiamos el nombre del servicio con NTSERVICE.SERVICENAME, y este se refleja en las pantallas de servicios, cuando realizamos el Start, el nombre del objeto NTSERVICE es el original, no el cambiado. Necesito recuperar el nombre del servicio bajo el que se ejecuta el programa.

!!! ya sé que es dificil, tanto que ni MS lo sabe!!! Alguien me ayuda.

Mailto:[email protected]