Properties . " Klicka på " Referenser " och välj sedan " Lägg till ". Välj " . NET " och klicka sedan på " System.ServiceProcess . " Klicka på " OK . " Tryck på " Ctrl " och " A " och tryck sedan på " Delete " för att ta bort befintlig kod .
3 Kopiera och klistra in följande kod till din " Module1.vb " modul . Denna kod kommer att avgöra status på " Apple Mobile Device " tjänsten :
Imports System.ServiceProcess
Modul Module1
Sub Main ( ) katalog
Prova
Dim ServiceCtrler Som New ServiceController ( " Apple Mobile Device " ) katalog p Om ServiceCtrler.Status.Equals ( ServiceControllerStatus.Running ) och ServiceCtrler.CanStop Sedan
Console.WriteLine ( ServiceCtrler.ServiceName ) katalog
Console.WriteLine ( " Status = " + ServiceCtrler.Status.ToString ( ) ) katalog
Console.WriteLine ( " kan pausa och fortsätta = " + _
ServiceCtrler.CanPauseAndContinue.ToString ( ) ) katalog
Console.WriteLine ( " kan stänga = " + ServiceCtrler.CanShutdown.ToString ( ) ) katalog
Console.WriteLine ( " Can Stop = " + ServiceCtrler.CanStop.ToString ( ) ) katalog
End If
Console.ReadLine ( ) katalog
Catch ex Som Exception
Console.WriteLine ( ex.Message ) katalog
End Försök
End Sub
ändmodul
4
Redigera följande kodrad och skriv namnet på den tjänst som du vill använda :
Dim ServiceCtrler som New ServiceController ( " Apple Mobile Device " )
5
Tryck " F5 " för att köra ditt program
.