Uninstall a Windows Service

Uninstall a Windows Service.

Note:This software is available as a pre-release.

Download the Chilkat Service ActiveX here: ChilkatService.zip
Unzip and register with regsvr32.

Dim service As New ChilkatService

'  To uninstall a Windows service, only the service name is
'  required:
service.ServiceName = "MyService"

Dim success As Long
success = service.Uninstall()
If (success <> 1) Then
    MsgBox "Failed to uninstall service."
    Text1.Text = Text1.Text & service.LastErrorText & vbCrLf
    Exit Sub
End If

MsgBox "Windows Service Uninstalled!"