Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/04/2009, 18:06
Avatar de Sergestux
Sergestux
 
Fecha de Ingreso: agosto-2007
Ubicación: Tapachula
Mensajes: 1.218
Antigüedad: 16 años, 9 meses
Puntos: 20
Saber dimensiones de una matriz de dos dimensiones

Hola colegas estoy haciendo un procedimiento que me va a rellenar un grid pasandole los datos en una matriz dimensional (columnas y renglones). La pregunta es como puedo saber cuantas columnas y cuantyos renglones tiene esa matriz, para poder hacer los bucles correspondientes de llenado.

Gracias por la posible ayuda que me puedan dar
Código vb:
Ver original
  1. 'Rellena el grid con los datos (Matriz) que se le pasen sentencia que se le pase
  2. Public Sub RellenaGrid(Grid As Variant, Datos As Variant)
  3. Dim Renglon As Integer, Columna As Integer
  4.  
  5.         'Recorro el grid
  6.        With Grid
  7.            
  8.                 .MaxRows = Result
  9.                 For Renglon = 1 To Result
  10.                     .Row = Renglon
  11.                     For Columna = 1 To .MaxCols
  12.                         .Col = Columna
  13.                         .Text = IIf(IsNull(Datos(Renglon, Columna)), "", Datos(Renglon, Columna))
  14.                     Next Columna
  15.                 Next Renglon
  16.                 '.Col = 1: .Row = 1
  17.                '.Col2 = .MaxCols: .Row2 = .MaxRows
  18.                .BlockMode = True
  19.         '        '.Lock = True
  20.                '.BlockMode = False
  21.        End With
  22.     End If
  23.    
  24. End Sub