Visual Basic - printer

hola a todos, ya encontré la forma de visualizar en vista previa, un reporte hecho con el objeto printer, lo que se necesita en un programa de visualize los reportes en vista previa, dicho programa esta en la red y es gratis, ahora no me acuerdo la direccion exacta, envienme sus correos y l,e reevio la direccion, intenten digitar "visualizar printer" en google

Ahora amigos, tengo este problema, miren con este codigo impirme el reporte, pero lo imprime 2 veces, me explico, imprime toda la informacion 2 veces en la misma hoja(no es una copia), imprime la informacion 2 veces(no entiendo porque), a ver si me ayudan amigos, gracias

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

Te recomendaria que revises que valor le estas dando a la variable de numdecopias
o bien yo haria esto en dos opciones

For i=1 to Numcopias -1

o bien

For i=0 to Numcopias

Ojala te sirva saludos

Gracias amigo Santiago, por la ayuda solucione el problema

A printer is a versatile device that plays a crucial role in various industries and everyday life. It enables the efficient reproduction of digital content onto physical mediums, such as paper or labels, allowing for easy access to information and enhancing organization. One specific application of printers is label printing, which empowers businesses to create and affix customized labels for product packaging, shipping, or inventory management. Whether it's for barcode labels, product identification, or address stickers, label printing capabilities offered by modern printers ensure accuracy, consistency, and professionalism, aiding in streamlining processes and improving overall productivity.