Lambda Enumerable..::.First<(Of )>) Generic Method (IEnumerable<(Of )>), Func<(Of )>))


Public Function IsServiceRuning(ByVal scName As String) As Boolean

Dim scServices() As ServiceController
scServices = ServiceController.GetServices
Dim sc As ServiceController = scServices.First(Function(s) s.ServiceName = scName)
If sc.Status = ServiceControllerStatus.Running Then
Return True
End If

End Function

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s

%d bloggers like this: