Visual Basic - Pasar un listbox entre dos formularios

Life is soft - evento anual de software empresarial
 
Vista:

Pasar un listbox entre dos formularios

Publicado por xsara1_9 (11 intervenciones) el 11/04/2005 14:27:09
Hola amigos, necesito enviar todo un listbox de un frm1 a un frm2 y en el destino visualizar su contenido.
En frm1 pongo:
f.ILista = lstRecursos
Y en frm2
Public ILista As ListBox
Pero me da un error:
Error 91 en tiempo de ejecución
Variable de tipo Object o la variable de bloque With no está establecida.
¿Qué hago mal? Muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pasar un listbox entre dos formularios

Publicado por Benjo (679 intervenciones) el 12/04/2005 05:04:41
No podés asignar un control a otro control. Eso lo podés hacer con los Objetos únicamente y en los casos que su estructura así lo permita.
Para tu caso deberías hacer una rurina
'En el Form1

Private Sub Command1_Click()
For a = 0 To List1.ListCount - 1
Form2.List1.AddItem List1.List(a)
Next
End Sub

Private Sub Form_Load()
For i = 0 To 10
List1.AddItem "Data" & i
Next
Form2.Show
End Sub

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pasar un listbox entre dos formularios

Publicado por SADE (322 intervenciones) el 12/04/2005 07:59:10
no entendi bien lo que quieres.
asi que pondre lo que yo entendi que deseas.

' en un modulo
Public lstDemo As ListBox

' en el form 1 que contendra un listbox
Set lstDemo = ListDelForm1

' en el form 2 que tiene otro listbox podras usar la variable lstDemo como si fuera el listbox del form 1
ListDelForm2.additem (lstDemo.list(1))
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar