If spooler.Status = System.ServiceProcess.ServiceControllerStatus.Running And _ _
  simptcp.Status = System.ServiceProcess.ServiceControllerStatus.Running Then
                spooler.Stop() 'beide laufen
 
                If spooler.Status = _
                  System.ServiceProcess.ServiceControllerStatus.Stopped Then
                     Debug.WriteLine("Spooler war gestoppt")
                    simptcp.Stop() 
                 Else
                      Debug.WriteLine("Spooler war nicht gestoppt")
                End If