How to Restart the Window Services using VB.Net?

Imports System.ServiceProcess.ServiceController

Function RestartService() As Boolean
Try
Dim controller As New ServiceProcess.ServiceController
controller.MachineName = "."
controller.ServiceName = "MSSQL$SQLEXPRESS"
Dim status As String = controller.Status.ToString
If status = "Running" Then
controller.Stop()
End If
controller.Start()
Return True
Catch ex As Exception
Return False
End Try
End Function