Ma sei sicuro che funziona? L'hai mai provato?Originariamente inviato da MItaly
codice: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
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!![]()

Rispondi quotando