un problema de matrices

[ZifuSka]

He aqui mi duda... estoy intentando meter un listbox en una matriz de tipo listbox, pero estoy probando de mil formas diferentes y nada, que no hay manera...por eso estoy empezando a dudar de que se pueda hacer eso... alguna idea porfavor?? ??? ??? ???

[Hadess_inf]

seria bueno que pongas tu codigo para ver en que tienes problemas ...

[ZifuSka]

Código [Seleccionar] Expandir

If n = 0 Then
ReDim mp(1 To 1)
Else
ReDim Preserve mp(1 To n + 1)
End If
n = n + 1
mp(n).num = txtAnum.Text
mp(n).nombre = txtAnombre.Text
For i = 1 To lstAgrupos.ListCount
mp(n).lista = lstAgrupos.List(i)
Next
txtAnum = ""
txtAnombre = ""
lstAgrupos.Clear
Unload Me
Exit Sub
y en el modulo:

Código [Seleccionar] Expandir

Type emepetreses
num As Integer
nombre As String
lista As ListBox
End Type

Public mp() As emepetreses
Public n As Integer

es lo que tengo ahora mismo, i me gustaría meter el lstAgrupos en  la matriz mp().lista

[ZifuSka]

jo... se han olvidade de este post  :'( :'( :'( :'(