Eigenschappen. " Klik op " Referenties " en selecteer vervolgens " toevoegen . " Selecteer " . NET " en klik op " System.ServiceProcess . " Klik op " OK . " Druk op " Ctrl " en " A " en vervolgens op " Delete " om de bestaande code te verwijderen .
Kopieer 3 en plak de volgende code op uw " Module1.vb " module . Deze code zal de status van de "Apple Mobile Device " dienst bepalen :
Imports System.ServiceProcess
Module
Module1
Sub Main ( ) op
Probeer
Dim ServiceCtrler
als Nieuwe ServiceController ( " Apple Mobile Device " ) op Twitter
Als ServiceCtrler.Status.Equals ( ServiceControllerStatus.Running ) En ServiceCtrler.CanStop
Console.WriteLine dan
(
Console.WriteLine ServiceCtrler.ServiceName ) op ( " Status = " + ServiceCtrler.Status.ToString ( ) )
Console.WriteLine
( " Kan Pauze en Continue = " + _
ServiceCtrler.CanPauseAndContinue.ToString ( ) )
Console.WriteLine
( " Kan ShutDown = " + ServiceCtrler.CanShutdown.ToString ( ) )
Console.WriteLine
( " Kan Stop = " + ServiceCtrler.CanStop.ToString ( ) )
End
Als
Console.ReadLine
( )
Catch ex
als Uitzondering
Console.WriteLine
( ex.Message )
End of Probeer
End Sub End Module
4
Bewerk de volgende regel code en typ de naam van de service die u wilt gebruiken :
Dim ServiceCtrler als Nieuwe ServiceController ( " Apple Mobile Device " ) op Twitter
Druk op " F5 " 5
om uw programma te draaien
.