Visual Basic - printer

Hola a todos, gracias por las ayudas, lo unico que no he podido resolver, es el tema de imprimir con el objeto Pinter.

les explico el disco duro de mi compu se malogro , y no pude recuperar la informacion de nada, empeze todo de nuevo, utilizo el mismo codigo que utilize anteriormente para imprimir ,pero ahora no muestra la vista previa del archivo para ver como queda, mando a imprimir, me pide un nombre para el archivo y luego no sale NADA NI LA VISTA PREVIA;
por fa amigos, a ver si me ayudan, GRACIAS A TODOS DE ANTEMANO

OBS; al final le puse Printer.endoc.

Si es un simple listado porque no usas el datareport, te da la opcion de imprimir, vista previa o guardar el documento con extensiòn XLM.

Es facil de usar......un abrazo

Hola como estas, lo que pasa que mi reporte es complejo , abarcar dos listview
y otros controles que con un data report, no lu puede hacer, como te explico el codigo para imprimir con el objeto printer, es el mismo codigo que utilize antes pero ahora el archivo no se muestra en vista preva para ver como queda el reporte, no se porque es , o es la conexion de la impresora, pero creo que eso no tiene que ver si solo es una vista previa:

les agredecere la ayuda amigos,

¿Una vista previa con el objeto Printer?
¿Al mandar imprimir, te pide el nombre del archivo?

Parece interesante, ¿puedes poner el código?

Es parte del codigo(el codigo completo incluye 2 listview y otro controles mas)

////////////////////////////////////////////////////////////////////
Commondialog1.cancel=true
Commondialog1.flags=&H20 ´para guadar impresión en un archivo
Commondialog1.showprinter

Numcopias=Commondialog1.copies ´numero de copias

For i=1 to Numcopias

Printer.print tab(8);”Listado de materiales”;
Printer.print
Printer.print tab(8);”Codigo”;
Printer.print tab(15);”Descripcion”;
Printer.print tab(25);”categoria”;
Printer.print tab(45);”Precio”;
Printer.print tab(60);”Cantidad”;
Printer.print

For fila=1 to lvw1.listitems.count
Printer.print tab(8);lvw1.listitems.item(fila);
Printer.print tab(15);lvw1.item(fila).subitems(1);
Printer.print tab(25); lvw1.item(fila).subitems(2);
Printer.print tab(45); lvw1.item(fila).subitems(3);
Printer.print tab(60); lvw1.item(fila).subitems(4);


Next fila

Next i

Printer.enddoc


/////////////////////////////////////////
pero al momento de mandar a imprimir salia una vista previa de como queda el archivo, luego si estabas deacuerdo con la vista se manda a imprimir, ahora manda a imprimir pero no muestra ninguna vista previa, no se loq ue pasara, falta algun programa al visual basic, si alguin me puede ayudar se lo agradecere,