Sono un nuovo utente di questo bel forum e voglio proporre al vostro giudizio un problema che non riesco a risolvere da autodidata.
Sviluppo un software per la gestione delle escursioni di un piccolo gruppo speleologico di cui faccio parte.
Ho sviluppato la seguente classe:

codice:
Imports Microsoft.VisualBasic

Public Structure strctEscursionista

    'Campi della Structure
    Private _strNome As String
    Private _strGruppo As String

    'Proprietà della Structure
    Public Property Nome() As String
        Get
            Return _strNome
        End Get
        Set(ByVal value As String)
            _strNome = value
        End Set
    End Property

    Public Property Gruppo() As String
        Get
            Return _strGruppo
        End Get
        Set(ByVal value As String)
            _strGruppo = value
        End Set
    End Property
End Structure

Public Class ClsGestioneEscursioni

    'Campi della classe
    Private _dtaData As Date = Nothing
    Private _strLocalita As String = ""
    Private _strCavita As String = ""
    Private _strctEscursionisti() As strctEscursionista = Nothing
    Private _strRelazione As String = ""


    'Proprietà della classe
    Public Property Data() As Date
        Get
            Return _dtaData
        End Get
        Set(ByVal value As Date)
            _dtaData = value
        End Set
    End Property

    Public Property Localita() As String
        Get
            Return _strLocalita
        End Get
        Set(ByVal value As String)
            _strLocalita = value
        End Set
    End Property

    Public Property Cavita() As String
        Get
            Return _strCavita
        End Get
        Set(ByVal value As String)
            _strCavita = value
        End Set
    End Property

    Public Property Escursionisti(ByVal Indice As Integer) As strctEscursionista
        Get
            Return _strctEscursionisti(Indice)
        End Get
        Set(ByVal value As strctEscursionista)
            _strctEscursionisti(Indice) = value
        End Set
    End Property

    Public Property Relazione As String
        Get
            Return _strRelazione
        End Get
        Set(ByVal value As String)
            _strRelazione = value
        End Set
    End Property

End Class
in realtà la classe è più complessa, ma questo basta per esporvi il problema
bene vengo al dunque, istanzio l'oggetto relativo alla classe e cerco di riempire i campi tramite le relative proprietà

codice:
	Dim escursione As New ClsGestioneEscursioni()

	Dim strData = "#12/24/2010#"
	escursione.Data = Date.Parse(strData)
	escursione.Localita = "Teletotes"
	escursione.Cavita = "Su Palu"
	escursione.Escursionisti(0).Nome = "Nome1"
	escursione.Escursionisti(0).Gruppo = "Gruppo1"
	escursione.Escursionisti(1).Nome = "Nome2"
	escursione.Escursionisti(1).Gruppo = "Gruppo2"
	escursione.Escursionisti(2).Nome = "Nome3"
	escursione.Escursionisti(2).Gruppo = "Gruppo3"
	escursione.Relazione = "fatto un bel giro e trovati nuovi rami da esplorare ulteriormente in prossime escursioni"
nelle 6 righe relative ai campi escursione.Escursionisti().Nome e escursione.Escursionisti().Gruppo mi viene segnalato questo errore

Errore L'espressione è un valore, quindi non può essere la destinazione di un'assegnazione.

sapete dirmi dove sbaglio?? Perché non posso riempire questi campi come gli altri??
Grazie per la vostra pazienza