Problemas con el flexgrid

projunior
14 de Febrero del 2006
Hola a todos, tengo una aplicacion donde muestro datos en un microsoft flexgrid cuando se carga el formulario. el siguiente codigo es el q uso para el flexgrid:
With mfgdatos
.Cols = 5
.Rows = rs.RecordCount
x = 0
.ColWidth(0) = 100
.ColWidth(1) = 500
.ColWidth(2) = 1000
.ColWidth(3) = 1000
.ColWidth(4) = 500
.TextMatrix(x, 1) = "codigo"
.TextMatrix(x, 2) = "articulo"
.TextMatrix(x, 3) = "marca"
.TextMatrix(x, 4) = "precio"

Do While Not rs.EOF
x = x + 1
.TextMatrix(x, 1) = rs!codarti
.TextMatrix(x, 2) = rs!nomarti
.TextMatrix(x, 3) = rs!marca
.TextMatrix(x, 4) = rs!prearti
rs.MoveNext
Loop
End With
Ahora el problema esta en que cuando ejecuto la aplicacion me sale el siguiente error381: El subindice esta fuera del intervalo y me resalta en color amarillo la siguiente linea: .TextMatrix(x, 1) = rs!codarti, en fin si saben como solucionar este problema y si es posible mejorar el codigo que estoy usando les estare agradecido, GRACIAS A TODOS.

mvallejos
14 de Febrero del 2006
Esto ya lo contesté en otro post, fijate unas pàginas más atrás en este foro.

Saludos