Font pour l'impression d'un code barre

astridgall Messages postés 5 Date d'inscription mardi 17 février 2004 Statut Membre Dernière intervention 1 août 2005 - 16 juin 2004 à 11:36
grandzebu Messages postés 27 Date d'inscription vendredi 22 août 2003 Statut Membre Dernière intervention 23 décembre 2017 - 29 juil. 2004 à 00:58
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

1 réponse

grandzebu Messages postés 27 Date d'inscription vendredi 22 août 2003 Statut Membre Dernière intervention 23 décembre 2017
29 juil. 2004 à 00:58
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
0
Rejoignez-nous