crear variables dinamicamente

[Vanchi]

Iniciado por Pegano

si Vanchi disculpa se me olvido pero la verdad no puedo usar una bidimencional por que la funcion no los acepta por lo que tengo que tenerlo por separado, como haria para recorrer variables :

Código vb:

Text1(1).Text = Arreglo1(25)
Text1(2).Text = Arreglo2(25)
Text1(3).Text = Arreglo3(25)
.......
Text1(30).Text = Arreglo30(25)
 

Código vb:

Text1(i).Text = Arregloi(25)
 

de alguna manera rrecorrer todos los arreglos de 1 al 30

Hola Pegano,

Vamos por partes...

1º La respuesta global: No, no se me ocurre como hacer esto

Código vb:

Text1(i).Text = Arregloi(25)
 

Ahora vamos a la segunda parte.

no puedo usar una bidimencional por que la funcion no los acepta

Tal vez acá SI pueda ayudarte.

¿El motivo por el cual no se puede usar las matrices bidimensionales es porque no las podés pasar a las funciones?

Si es por esto, la respuesta es simple... Solo declará dinámica el parámetro de la función y listo!

Mirá este ejemplo simple:

Código vb:

Private Sub Command1_Click()
Dim V(25, 25) As Byte
MsgBox (Algo(V))
End Sub
 
Private Function Algo(Matriz() As Byte) As Integer
Algo = UBound(Matriz, 1) + UBound(Matriz, 2)
End Function
 

En ese ejemplo pasé una matriz estática bidimensional como parámetro de una matriz dinámica.

Saludos.