impression sstab vb6

bonjour,
jaimerai imprimer les onglets d'un sstab(3 onglets)
j'utilise printform, ca marche pour le premier mais pas pour les suivant.
si qq un a un code pour tous les imprimer je suis preneur
merci d'avance et bonne prog

for intCpt = 0 to 2

   sstab1.tab = intcpt

   'Ici tu fais ton print form

next

Ça va sortir de pages, 1 pour chauqe tab

Voilà

justement c'est ce ke j'ai fait,
je doi les imprimer en mode paysage
pour le primer onglet pas de probles et pour le suivant il me met un code d'erreur 486.
impossible d'imprimer plus d'une feuille

Donc, si j'ai bien compris, tu veux sortir 3 feuilles.

Mais  est-ce qu'il sort la première feuille et ensuite il bug ou est-ce qu'il n'imprime rien du tout?

IL IMPRIME LA PREMIERE FEUILLE
pour la deuxieme il me met une erreur 486 impossible d'imprimer la page sur ce type d'imprimante

Essaie cela, ça devrait règler ton problème

dim pf as PrintForm

for intCpt = 0 to 2
  
   sstab1.tab = intcpt
   set pf = new PrintForm
   pf.form = me
   pf.printaction = PrintToPrinter
   pf.Print()
  

next

voilà

il y a une erreur dans la preiere ligne avec le 'as printform'

J'avais oublier que pour utiliser les objets PrintForm il faut un Add-in de VB6

Mais je viens de tester ce code et il marche parfaitement pour moi.

For intCpt = 0 To 2
  
   SSTab1.Tab = intCpt
  
   Me.PrintForm
  

Next

ESSA YE EN ESSAYANT D IMPRIMER EN MODE PAYSAGE
EN MODE NORMAL MOI AUSSI CA MARCHE MAIS PAS EN PAYSAGE

Tu pourrais aussi montrer ce que tu as de fait, je pourrais essayer de debugger