[VB] Traduzione codice

_batteryState.Changed += New ChangeEventHandler(AddressOf battery_Changed)

'Creazione dell'istanza di SystemState relativa allo stato da monitorare
        Dim _batteryState As New SystemState(SystemProperty.PowerBatteryStrength)
        'Registrazione all'evento Changed dello state monitorato
        AddHandler _batteryState.Changed, AddressOf battery_Changed

namespace MSDN.Article.SNBroker {
    public partial class Form3 : Form {
        /// <summary>
        /// Chiamata in arrivo sul device
        /// </summary>
        private readonly SystemState _incomingCaller;

        public Form3() {
            InitializeComponent();
            _incomingCaller = new SystemState(SystemProperty.PhoneIncomingCallerName);
            //Imposto il ComparisonType ad Equal 
            in modo da recuperare le sole chiamate in arrivo da un contatto specifico
            _incomingCaller.ComparisonType = StatusComparisonType.Equal;
            //Imposto il ComparisonValue
            _incomingCaller.ComparisonValue = "MSDN, Italia";
            //Registro l'evento di cambio del caller
            _incomingCaller.Changed += new ChangeEventHandler(_incomingCaller_Changed);
        }