Espressione C# ed equivalente in VB

[giuse.dv]

Salve, sono nuovo di questo forum e mi chiamo Giuseppe.
Seguo da tempo le discussioni e ho deciso di volerne far parte anch'io !!

Veniamo al dunque : specifico che fino ad ora ho sempre programmato in Java e C# prevalentemente utilizzando un'architettura MVC. Da poco mi sono inoltrato nel mondo VB e sto studiando appunto il codice.
In particolare, io utilizzavo spesso questo frammento di codice, e vorrei avere un aiutino per sapere quale sia l'equivalente espressione in VB per ottenere lo stesso risultato.

Questo è il codice C#

public class Classe { 

    private IDictionary mappaBean = new Hashtable(); 

    public Object this[Object key] { 
       get { return this.mappaBean[key]; } 
       set { this.mappaBean[key] = value; } 
    } 
}

Attendo riscontri,
Grazie.

[oregon]

Sì ... ma non ci hai neanche provato?

[giuse.dv]

Certo. Come prima cosa ho provato ad utilizzare la parola chiave Me, evidentemente in maniera errata in quanto mi venivano restituiti degli errori. Come alternativa ho utilizzato questa porzione di codice.

Public Class Classe

    Private _mappaBean As IDictionary = New Hashtable()

    Public Property MappaBean(ByVal key As Object)
        Get
            Return Me._mappaBean(key)
        End Get
        Set(ByVal value)
            Me._mappaBean(key) = value
        End Set
    End Property

End Class

Ma è ovvio che non è la stessa cosa.

Questa è la porzione di codice che ho provato con la parola chiave Me, ma che non va bene.

    Public Property Me(byVal key As Object) As Object
        Get
            Return _mappaBean.Item(key)
        End Get
        Set(ByVal value As Object)
            _mappaBean(key) = value
        End Set
    End Property

[oregon]

E' meglio così

    Public Class Classe
        Private mappaBean As IDictionary = New Hashtable()

        Default Public Property Item(key As Object) As Object
            Get
                Return Me.mappaBean(key)
            End Get
            Set(value As Object)
                Me.mappaBean(key) = value
            End Set
        End Property
    End Class

[giuse.dv]

Ok, grazie.