font pour l'impression d'un code barre

Bonjour,

j'imprime un form avec un code barre juste pour un champ label. Dans un cas ca marche dans l'autre non ?
Je suis sur vb6 et windows 98 l'imprimante code barre est une TEC.

celle qui marche :

EtiquetteModule.lblCodeBarre.Font.Size = "24"
EtiquetteModule.lblCodeBarre.Font.Name = "TEC-Code 128 Large"
EtiquetteModule.lblNumSerie.Font.Name = "TEC Times Roman"
EtiquetteModule.lblCodeBarre.Caption = strModule
EtiquetteModule.lblCodeGamme.Caption = strCodeGammePlus
EtiquetteModule.lblNumSerie.Caption = strNumSeriePlus
EtiquetteModule.lblTypeVerre.Caption = strTypeVerre
EtiquetteModule.lblCodeBaan.Caption = strCodeBaanCourt
EtiquetteModule.lblCodeOpe.Caption = gstrCodeUserCourant
EtiquetteModule.lblClt.Caption = strAppelClient
'EtiquetteModule.Show

EtiquetteModule.PrintForm

celle qui ne marche pas

strFormatPal = Format(intNumPal, String$(gIntLENGTH_CODEBARREPAL, "0"))
strCodeBarrePal = "P" & strFormatPal

EtiquettePalette.lblCodeBarre.Font.Name = "TEC-Code
128 Large"
EtiquettePalette.lblCodeBarre.Font.Size = "24"
EtiquettePalette.lblCodeBarre.Caption = strCodeBarrePal
EtiquettePalette.lblNumPal.Caption = strCodeBarrePal

'EtiquettePalette.Show
EtiquettePalette.PrintForm

merci d'avance

astrid

Si la chaine de caractère qui affiche le code barre contient le caractère & (ASCII 38) ça ne marche pas. Ce caractère est bouffé car le label le considère comme l'indicateur du raccourci clavier.
GZ
http://grandzebu.net