Comment imprimer
doodoo82
Messages postés
10
Date d'inscription
vendredi 23 janvier 2004
Statut
Membre
Dernière intervention
8 mars 2004
-
24 févr. 2004 à 15:10
Tilois Messages postés 721 Date d'inscription dimanche 10 juin 2001 Statut Membre Dernière intervention 27 mars 2011 - 24 févr. 2004 à 15:35
Tilois Messages postés 721 Date d'inscription dimanche 10 juin 2001 Statut Membre Dernière intervention 27 mars 2011 - 24 févr. 2004 à 15:35
1 réponse
Tilois
Messages postés
721
Date d'inscription
dimanche 10 juin 2001
Statut
Membre
Dernière intervention
27 mars 2011
7
24 févr. 2004 à 15:35
24 févr. 2004 à 15:35
Printer.FontName = "Times New Roman"
Printer.FontSize = 16
dim i as long
for i=0 to list1.listcount-1
List1.ListIndex = i
Printer.Print list1.text
next i
Printer.EndDoc
Printer.FontSize = 16
dim i as long
for i=0 to list1.listcount-1
List1.ListIndex = i
Printer.Print list1.text
next i
Printer.EndDoc