[VB6] Passaggio di una matrice ad una routine

[malva73]

Salve!!!!
Io ho una matrice di listbox chiamata Lista(id).ù

Ho poi scritto la seguente routine che può essere richiamata e che prende come argomenti una matrice di lisrbox:

Public Sub CancellaListeMatrici(Lista() As ListBox)
Dim i As Integer
For i = 0 To Lista().Count - 1
Lista(i).Clear
Next i
End Sub

Quando la richiamo con:

Call CancellaListeMatrici(Lista_id())

passandole appunto come argomento la mia matrice di liste lista_id() il programma mi dà errore dicendo che si aspetta come argomento una matrice!!!!!

Sapreste dirmi dove sbaglio?????

Ho forse sbagliato il passaggio di argomento matrice

[Johnny_Depp]

subforum, please! sposto là.

[oregon]

Il codice corretto e'

Private Sub CancellaListeMatrici(Lista As Variant)
  Dim i As Integer
  For i = 0 To Lista.Ubound
    Lista(i).Clear
  Next i
End Sub

' E la richiami con
CancellaListeMatrici Lista_id

ma questa versione è migliore

Private Sub CancellaListeMatrici(Lista As Variant)
  Dim L As Variant
  For Each L In Lista
    L.Clear
  Next
End Sub

' E la richiami sempre con
CancellaListeMatrici Lista_id

[malva73]

Ho provato e funziona, grazie 1000!!!!!