Propriedade NavigationButton.FontName (Access)

Use a propriedade FontName para especificar a fonte para texto nas seguintes situações:

• Ao exibir ou imprimir controles em formulários e relatórios.
• Ao utilizar o método Print em um relatório.

Cadeia de caracteres de leitura/gravação.

Sintaxe

expressão. Fontname

Expressão Uma variável que representa um objeto NavigationButton .

Comentários

A configuração da propriedade FontName é o nome da fonte que o texto é exibido.

Você pode definir o padrão dessa propriedade usando o estilo de controle padrão de um controle ou a propriedade DefaultControl no Visual Basic.

Para relatórios, você pode definir essa propriedade somente em um procedimento de evento ou em uma macro especificada pela configuração da propriedade de evento OnPrint.

A disponibilidade de fontes depende do sistema e da impressora. Se você selecionar uma fonte que o seu sistema não consiga exibir ou que não esteja instalada, o Windows a substituirá por outra semelhante.

Exemplo

O exemplo a seguir usa o método Print para exibir texto em um relatório chamado Report1. Ele usa os métodos TextHeight e de TextWidth para centralizar o texto vertical e horizontalmente.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.