Programación General > Visual Basic 6.0 e inferiores

 Como Puede Imprimir Los Datos De Un Listview

(1/1)

Daniel_PC:
Como puede imprimir los datos de un Listview?
Gracias...

Brroz:
Hola Daniel_Pc.

Puedes probar con un código de este estilo :


--- Código: Text ---     Dim itm1 As ListItem, int1 As Integer    Dim sngY As Single, sngX() As Single    ReDim sngX(1 To ListView1.ColumnHeaders.Count)    sngX(1) = 10    For int1 = 1 To ListView1.ColumnHeaders.Count - 1        sngX(int1 + 1) = sngX(int1) + ListView1.ColumnHeaders(int1).Width    Next int1    For Each itm1 In ListView1.ListItems        sngY = Printer.CurrentY        Printer.CurrentX = 10        Printer.Print itm1.Text        Printer.CurrentY = sngY        For int1 = 1 To ListView1.ColumnHeaders.Count - 1            Printer.CurrentX = sngX(int1 + 1)            Printer.CurrentY = sngY            Printer.Print itm1.SubItems(int1)        Next int1    Next itm1  
Ojo que el código está escrito al vuelo. No está probado ni depurado... es para que te hagas una idea.

Abur.

Navegación

[0] Índice de Mensajes