Ver Mensaje Individual
  #1 (permalink)  
Antiguo 09/08/2012, 23:46
Avatar de BillieBert
BillieBert
 
Fecha de Ingreso: diciembre-2011
Mensajes: 37
Antigüedad: 12 años, 4 meses
Puntos: 1
Como pasar un Array de cualquier tipo como argumento

Hola!

Bueno, mi problema es que estaba tratando de hacer una función que haga "push" en un array, es decir que agregue un elemento al final de un array, la función es esta:

Código:
    Public Sub Push(ByRef DiArray() as string, ByRef DiValue as string)
        Dim Limite As Integer = DiArray.Length
        ReDim Preserve DiArray(Limite)
        DiArray(Limite) = DiValue
    End Sub
Trabaja bien, solo que acepta únicamente arrays de tipo string como se puede ver en la definición, lo que yo quiero hacer es que acepte cualquier tipo de Arrays para que funcione de manera mas universal.

El problema es que si quito el tipo de Array "as string" me dice que si un argumento está definido todos deben estarlo, y si quito el tipo al argumento DiValue entonces al compilar me da mensaje de error que es el siguiente:

"No se puede convertir un valor de tipo '1-matriz dimensional de integer' en '1-matriz dimensional de object' debido a que 'integer' no es un tipo de referencia.

Agradecería que alguien me indicara si existe solución, repito: quiero hacer una función que acepte todo tipo de Arrays y todo tipo de Valores que seran agregados al Array.

Un saludo y gracias de antemano!
__________________
La religión y la política pasaron de moda. Lo de hoy es el arte y el idealismo.