Retrieve List Of Services Running On Server?

I'm looking for a way to get details of the name and status of all services running on a service. I did use the following code:
Public Sub GetServices()
Dim localServices As ServiceController() = ServiceController.GetServices()
For Each service As ServiceController In localServices
If Not String.IsNullOrEmpty(service.DisplayName) Then
dictservice(service.DisplayName) = New Service(service.DisplayName, service.ServiceName, service.Status.ToString)
End If
Next
End Sub
However, since I have packaged up my project as a WCF service, the System.ServiceProcess namespace I used cannot be used: Is there any other way I can retrieve the same details? Possibly through WMI?