[VB6] Una proprietà di una classe può essere un array?

[Luciano79]

Ciao a tutti,
tra le proprietà di una classe ho bisogno di avere un array ovvero

  Private V_Nome As String
  Private V_Cognome As String
  Private V_ElencoCase(MaxElencoCase) As String

  Public Property Get Nome() As String
    Nome = V_Nome
  End Property

  Public Property Let Nome(sNome As String)
    V_Nome = Nome
  End Property

  Public Property Get Cognome() As String
    Cognome = V_Cognome
  End Property

  Public Property Let Cognome(sCognome As String)
    V_Cognome = Cognome
  End Property

  'per quel che riguarda l'array V_ElencoCase
  'che devo fare per impostare e per
  'ottenere il valore di un elemento?

Grazie!

[MItaly]

  Private V_Nome As String
  Private V_Cognome As String
  Private V_ElencoCase(MaxElencoCase) As String

  Public Property Get Nome() As String
    Nome = V_Nome
  End Property

  Public Property Let Nome(sNome As String)
    V_Nome = Nome
  End Property

  Public Property Get Cognome() As String
    Cognome = V_Cognome
  End Property

  Public Property Let Cognome(sCognome As String)
    V_Cognome = Cognome
  End Property

  Public Property Get ElencoCase(ByVal index As Long) As String
    ElencoCase = V_ElencoCase(index)
  End Property

  Public Property Let ElencoCase(ByVal index As Long, ByVal sElencoCase As String)
    V_ElencoCase(index) = sElencoCase 
  End Property

[Luciano79]

Originariamente inviato da MItaly

  Private V_ElencoCase(MaxElencoCase) As String

  Public Property Get ElencoCase(ByVal index As Long) As String
    ElencoCase = V_ElencoCase(index)
  End Property

  Public Property Let ElencoCase(ByVal index As Long, ByVal sElencoCase As String)
    V_ElencoCase(index) = sElencoCase 
  End Property

Ma sei sicuro che funziona? L'hai mai provato?
Ora non ho davanti il pc con VB, ma ho provato ieri una cosa simile e dava un errore del tipo "Le definizioni della routine Property per la stessa proprietà non sono coerenti o utilizzo di un parametro facoltativo non valido" Evidenziando il Let. L'ho scritto praticamente uguale a parte il "ByVal". Sicuramente sono io che sto facendo la pirlata, ma non capisco cosa.
Grazie!

[Luciano79]

Ok, ero io che davo i numeri:
nei parametri di Let, index deve essere sempre il primo! (Io ovviamente lo mettevo per secondo)