Parametro INPUT: ListBox

[Fra]

Ciao!
Ho un piccolo problema.
Ho creato una routine che ha un unico parametro di ingresso :
- Lista di tipo LISTBOX

Quando però richiamo la funzione e gli passo la listbox che desidero mi da incompatibilità di formati (formato non valido del parametro di input).
Il codice e' questo

ObjClasse.Routine (Form_Prova.ListBox_Prova)

Dove Form_Prova e' una maschera e ListBox_Prova e' una ListBox all'interno di Form_Prova.
Credo che gli passi il valore selezionato da ListBox_Prova.
Quindi ho provato a fare cosi' :

Dim Form_Copia As Form
Set Form_Copia = Form_Prova
ObjClasse.Routine (Form_Copia.ListBox_Prova)

Con questo codice funziona ... ma mi sapete consigliare un modo un po' piu' elegante (magari esiste un funzione predefinita ...).

Grazie.

Ciauz

[Fra]

:quote:

[Mabi]

Non ho capito cosa devi fare.

• Devi passare l'Item selezionato ?
• Devi passare la ListBox ?
• ...

[sebamix]

Passi la listbox come parametro al metodo di una classe?
Prova passandolo "as object".

[Fra]

Originariamente inviato da sebamix
Passi la listbox come parametro al metodo di una classe?

Esatto ! Passo la LISTBOX come parametro di input

Prova passandolo "as object".

[/B][/QUOTE]

Ok, ci provo ...

[Fra]

Ho provato a definire il parametro di input come As Object ... ma non funziona!

Qualche altra idea?

[Fra]

Ho lasciato come parametro di input, nella definizione della routine, ... As ListBox

Poi al momento della chiamata passo la ListBox utilizzando il metodo Forms, cioè ...

Forms(Numero_Form_Prova).ListBox_Prova

Cmq grazie a tutti per l'aiuto!