Partager via

Propriété Label.FontName (Access)

  • Article

Utilisez la propriété FontName pour spécifier la police du texte dans les situations suivantes :

  • Lors de l'affichage ou de l'impression de contrôles dans des formulaires et des états.
  • Lorsque vous utilisez la méthode Print dans un état.

Type de données Chaîne en lecture-écriture.

Syntaxe

expression. FontName

Expression Variable qui représente un objet Label .

Remarques

Le paramètre de la propriété FontName est le nom de la police du texte affiché dans.

Vous pouvez définir la valeur par défaut pour cette propriété à l’aide du style de contrôle par défaut d’un contrôle ou de la propriété DefaultControl dans Visual Basic.

Pour les États, vous pouvez définir cette propriété uniquement dans une procédure événementielle ou une macro spécifiée par le paramètre de propriété événementielle OnPrint.

Les polices disponibles dépendent de votre système et de votre imprimante. Si vous sélectionnez une police que votre système n'est pas capable d'afficher ou qui n'est pas installée, Windows lui substitue une police similaire.

Exemple

L'exemple suivant utilise la méthode Print pour afficher du texte dans un état appelé Etat1. Il utilise les méthodes TextWidth et TextHeight Centre le texte verticalement et horizontalement.

Private Sub Detail_Format(Cancel As Integer, _ 
 FormatCount As Integer) 
 Dim rpt as Report 
 Dim strMessage As String 
 Dim intHorSize As Integer, intVerSize As Integer 
 
 Set rpt = Me 
 strMessage = "DisplayMessage" 
 With rpt 
 'Set scale to pixels, and set FontName and 
 'FontSize properties. 
 .ScaleMode = 3 
 .FontName = "Courier" 
 .FontSize = 24 
 End With 
 ' Horizontal width. 
 intHorSize = Rpt.TextWidth(strMessage) 
 ' Vertical height. 
 intVerSize = Rpt.TextHeight(strMessage) 
 ' Calculate location of text to be displayed. 
 Rpt.CurrentX = (Rpt.ScaleWidth/2) - (intHorSize/2) 
 Rpt.CurrentY = (Rpt.ScaleHeight/2) - (intVerSize/2) 
 ' Print text on Report object. 
 Rpt.Print strMessage 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.