Como adicionar RaiseEvent para erro delegado após a conversão de C# para Vb.Net

Sou novato em Delegados e estou tentando converter o seguinte código C# em Vb.Net.

Código C# original:

    public delegate void delConnectionStatusChanged(EventDrivenTCPClient sender, ConnectionStatus status);
    public event delConnectionStatusChanged ConnectionStatusChanged;
    private ConnectionStatus _ConStat;

    public ConnectionStatus ConnectionState
    {
        get
        {
            return _ConStat;
        }
        private set
        {
            bool raiseEvent = value != _ConStat;
            _ConStat = value;
            if (ConnectionStatusChanged != null && raiseEvent)
                ConnectionStatusChanged.BeginInvoke(this, _ConStat, new AsyncCallback(cbChangeConnectionStateComplete), this);
        }
    }


    private void cbChangeConnectionStateComplete(IAsyncResult result)
    {
        var r = result.AsyncState as EventDrivenTCPClient;
        if (r == null)
            throw new InvalidOperationException("Invalid IAsyncResult - Could not interpret as a EDTC object");
        r.ConnectionStatusChanged.EndInvoke(result);
    }

Convertido para código Vb.Net:

    Public Delegate Sub delConnectionStatusChanged(ByVal sender As EventDrivenTCPClient, ByVal status As ConnectionStatus)
    Public Event ConnectionStatusChanged As delConnectionStatusChanged
    Private _ConStat As ConnectionStatus

    Public Property ConnectionState As ConnectionStatus
        Get
            Return _ConStat
        End Get
        Private Set(ByVal value As ConnectionStatus)
            Dim [raiseEvent] As Boolean = value <> _ConStat
            _ConStat = value
            If ConnectionStatusChanged IsNot Nothing AndAlso [raiseEvent] Then ConnectionStatusChanged.BeginInvoke(Me, _ConStat, New AsyncCallback(AddressOf cbChangeConnectionStateComplete), Me)
        End Set
    End Property


    Private Sub cbChangeConnectionStateComplete(ByVal result As IAsyncResult)
        Dim r = TryCast(result.AsyncState, EventDrivenTCPClient)
        If r Is Nothing Then Throw New InvalidOperationException("Invalid IAsyncResult - Could not interpret as a EDTC object")
        r.ConnectionStatusChanged.EndInvoke(result)
    End Sub

A fonte completa e a conversão podem ser vistas em: https://pastebin.com/LuvqDvtM

Após a conversão, recebo o mesmo erro para as linhas:

    r.ConnectionStatusChanged.EndInvoke(result)

e

    ConnectionStatusChanged.BeginInvoke(Me, _ConStat, New AsyncCallback(AddressOf cbChangeConnectionStateComplete), Me)

O erro BC32022 'Public Event ConnectionStatusChanged As EventDrivenTCPClient.delConnectionStatusChanged' é um evento e não pode ser chamado diretamente. Use uma instrução 'RaiseEvent' para gerar um evento.

Então, aprendi que a linha é um evento e posso usar uma instrução 'RaiseEvent', mas o que não entendo é o que a linha está realmente fazendo ou qual deveria ser o manipulador para 'RaiseEvent'.