Visual Basic - imprimir los datos desde una grilla

Life is soft - evento anual de software empresarial
 
Vista:

imprimir los datos desde una grilla

Publicado por wally (1 intervención) el 06/07/2005 21:54:41
porfa! alguien que me ayude necesito urgente saber como puedo imprimir una grilla estoy
usando visual basic 6

agradecere mxo a quien me ayude chao........

wally
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 los datos desde una grilla

Publicado por Guillermo Lamas (25 intervenciones) el 08/07/2005 02:55:16
yo lo hago asi, leo cada fila de la grilla y la voy imprimiendo

For fila = 1 To GrillaTarj.Rows - 1

conteo = conteo + 1

GrillaTarj.Row = fila

GrillaTarj.Col = 0

If conteo > 50 Then
Printer.NewPage
ImprimirEncabezado
End If
'contenido de la grilla

Printer.FontBold = False
GrillaTarj.Col = 0
Printer.Print Tab(0); Trim(GrillaTarj.Text);
GrillaTarj.Col = 1
diferencia = 10 - Len(Trim(GrillaTarj.Text))
paso = String(diferencia, " ") & Trim(GrillaTarj.Text)
Printer.Print Tab(8); paso;
GrillaTarj.Col = 2
If Trim(Mid$(GrillaTarj.Text, 1, 5)) = "Total" Or Trim(Mid$(GrillaTarj.Text, 1, 5)) = "RESUMEN" Then
Printer.Print Tab(8); GrillaTarj.Text;
Else
Printer.Print Tab(21); Trim(Mid$(GrillaTarj.Text, 1, 26));
End If
GrillaTarj.Col = 3
diferencia = 10 - Len(Trim(GrillaTarj.Text))
paso = String(diferencia, " ") & Trim(GrillaTarj.Text)
Printer.Print Tab(58); paso;
GrillaTarj.Col = 4
Printer.Print Tab(71); GrillaTarj.Text
Next
Printer.EndDoc

espero te sirva , si hay dudas me envias un correo

Guillermo
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