19/05/2009, 10:40
|
| | | Fecha de Ingreso: marzo-2009
Mensajes: 355
Antigüedad: 15 años, 1 mes Puntos: 4 | |
| Respuesta: No imprime columnheader
Asi:
Código:
For i = 1 To ListView2.ColumnHeaders.Count
AnchoCol = AnchoCol + ListView2.ColumnHeaders(i).Width
Next
For i = 1 To ListView2.ColumnHeaders.Count
Espacio = Espacio + CInt(ListView2.ColumnHeaders(i).Width * Printer.ScaleWidth / AnchoCol)
Printer.Print ListView2.ColumnHeaders(i).Text;
Printer.CurrentX = Espacio
Next
|