Impresion de un ListView

Nabucodonosor
21 de Marzo del 2005
Hola a todos
Favor si alguien me puede decir como imprimo el contenido de un listview, estoy tratando de hacerlo con
Private Sub cmd_print_Click()
Dim i As Integer
For i = 0 To i = 15
Printer.Print ListView2.ListItems(i)
Next i
Printer.EndDoc
End Sub
Pero no me sale nada, que debo hacer o como lo debo imprimir?
Por la atencion les anticipo las gracias

krizall
21 de Marzo del 2005
hola

has esto
dim rengrol as integer
renglon=1140 'por ejemplo
printer.currentx =1440
with listview1.listitems
for i= 1 to .count
printer.pirnt .item(i)
renglon=renglon + 200
next i
end with
printer.enddoc

espero te sirva
cualquier duda no dudes en escribir