Visual Basic - Imprimir un flexgrid

Life is soft - evento anual de software empresarial
 
Vista:

Imprimir un flexgrid

Publicado por Roberto (1 intervención) el 03/07/2004 03:04:00
Hola, necesito ayuda sobre como madar el contenido de un flexgrid a la impresora, de antemando gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Imprimir un flexgrid

Publicado por miguel (1042 intervenciones) el 03/07/2004 18:22:23
Puedes utilizar el Printer. Print ejemplo:
Private Sub CMDIMPRIMIR_Click()
Dim i As Integer
Dim p As Integer
encab
With MSFsistema
For i = 0 To MSFsistema - 1
Printer.Print Tab(5); .TextMatrix(i, 0);
Printer.Print Tab(10); .TextMatrix(i, 1);
Printer.Print Tab(15); .TextMatrix(i, 2);
Printer.Print Tab(20); .TextMatrix(i, 3);
Printer.Print Tab(25); .TextMatrix(i, 4);
Printer.Print Tab(30); .TextMatrix(i, 5);
p = p + 1
If p > 60 Then
Printer.NewPage
encab
p = 0
Next
End If
Printer.EndDoc
End Sub
Private Sub encab()
hoja = hoja + 1
Printer.Font.Bold = True
Printer.Print Tab(30); "venta de blocks"
Printer.Print Tab(25); "Blockreto del pacifico"
Printer.Print Tab(60); "hoja #:";
Printer.Print Tab(75); hoja
Printer.Print Tab(5); ""
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar