Source / Exemple :
'Déclaration des variables
Dim Titre
Dim Hwidth
'Définition de la police et de sa taille
Printer.FontName = "Courier new"
Printer.FontSize = 14
'Déclaration de votre titre (remplacez "TITRE DE LA PAGE" par votre titre)
Titre = "TITRE DE LA PAGE"
'Calcule la largeur de la moitié de votre titre, pour calculer le milieu de la page
Hwidth = Printer.TextWidth(Titre) / 2
Printer.Print ""
Printer.Print ""
'Imprime votre titre sur la page (en fait, le titre est au milieu car le programme prend le milieu de la page, enlève la moitié du titre -avec la variable hwidth- et fait partir le titre d'ici : donc, le titre paraît être au milieu)
Printer.CurrentX = Printer.ScaleWidth / 2 - Hwidth: Printer.FontSize = 14: Printer.Print Titre
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.