Imprimir MSFlexGrid en Visual Basic 6
Hola Experto!
Quizás mi duda te parezca fácil, pero para mi no lo es :(, necesito imprimir un MSFlexGrid el cual esta conectado a una base de datos access mediante un data y ya cargado en pantalla.
Muchas gracias por anticipado...
Quizás mi duda te parezca fácil, pero para mi no lo es :(, necesito imprimir un MSFlexGrid el cual esta conectado a una base de datos access mediante un data y ya cargado en pantalla.
Muchas gracias por anticipado...
1 respuesta
Respuesta de milarantonio
1
En VB 6 no lo sé, es que yo me quedé en el 5, pero que yo sepa no hay un método rápido y sencillo así como una instrucción y ya esta. Lo que creo que tienes que hacer es algo parecido a esto:
'con esto llenas el recordset y te aseguras de que se cuentan todos los registros
data1.Recordset.movelast
data1.Recordset.movefirst
'aquí comienza un bucle para imprimir todos los registros
For n = 1 To _
data1.Recordset.recordcount
'esta linea la puedes repetir tantas veces como campos de la base de datos desees imprimir
Printer.Print _
data1.Recordset![Nomb_campo]
data1.Recordset.movenext
Next n
Printer. EndDoc
Bueno espero que te sirva.
'con esto llenas el recordset y te aseguras de que se cuentan todos los registros
data1.Recordset.movelast
data1.Recordset.movefirst
'aquí comienza un bucle para imprimir todos los registros
For n = 1 To _
data1.Recordset.recordcount
'esta linea la puedes repetir tantas veces como campos de la base de datos desees imprimir
Printer.Print _
data1.Recordset![Nomb_campo]
data1.Recordset.movenext
Next n
Printer. EndDoc
Bueno espero que te sirva.
