Tema: Matriz en VB
Ver Mensaje Individual
  #4 (permalink)  
Antiguo 11/06/2009, 18:52
prisiomechas
 
Fecha de Ingreso: junio-2009
Mensajes: 14
Antigüedad: 14 años, 11 meses
Puntos: 0
Respuesta: Matriz en VB

Cita:
Iniciado por culd Ver Mensaje
- Crea la conexion con la base de datos

- Carga el recorset con la info de la tabla

- Recorre con un while toda la tabla...

Mientras vas recorriendo vas cargando en la matris

valores(recorset(0), recorset(1)) = recorset(2)

Y listo al pollo.
culd, muchas gracias por tu tiempo y por tu respuesta... pero me queda la duda de como hacer el while para recorrer la tabla???



Cita:
Iniciado por ValentinoMolinari Ver Mensaje
Hola Prisiomechas....mira mi punto de vista es el siguiente......no te conviene mas cargar la tabla en un MSFlexGrid y luego recorrer el flex???? asi te evitas declarar matrices y demas....el MSFlexGrid como el MSHFlexGrid tiene una propiedad llamada TextMatrix donde le pasas las coordenadas para que te devuelva los datos ;)

Strslq = "Select * From XTabla"
'Abris el Recordset
Rs.open strsql,Cn (Cn es la coneccion con la base)

Set MSHFLEXGRID1.Datasource = Rs

For X = 1 To Flex1.Rows - 1
flex1.textmatrix(X,1) 'Donde X es el Valor de la FILA y 1 el VALOR DE LA COLUMNA
next

con el msflexgrid tiene que hacer un bucle para cargar
o sea
do while NOT rs.EOF
Flex1.textmatrix(flex.row,1) = rs.field(0)
Flex1.textmatrix(flex.row,2) = rs.field(1)
(y asi dependiendo la cantidad de datos que quieras mostrar)
rs.movenext
loop

espero te sirva saludos
EL MHFLEXGRID

Valentino, gracias por dar una nueva alternativa, la voy a tener en consideración, muchas gracias por tu tiempo y tu sugerencia... me queda una duda en esto...
Flex1.textmatrix(flex.row,1) = rs.field(0)
Flex1.textmatrix(flex.row,2) = rs.field(1)
etc....

tendria q hacer esa instrucción por cada columna que quiera mostrar?

gracias de antemano a los dos!!!