Propriedade Application.DialogFont (Visio)

Retorna informações sobre as fontes que o Microsoft Visio utiliza nas caixas de diálogos. Somente leitura.

Sintaxe

expressão. DialogFont

expressão Uma variável que representa um Aplicativo objeto.

Valor de retorno

IFontDisp

Comentários

Utilize esta propriedade para apresentar as caixas de diálogo no mesmo tipo de letra que as caixas de diálogo do Visio.

O COM (Component Object Model) fornece uma implementação padrão de um objeto de fonte com a interface IFontDisp acima do suporte de fonte do sistema subjacente. A interface IFontDisp expõe as propriedades de um objeto de tipo de letra e é implementada na biblioteca de tipo stdole como um objeto StdFont que pode ser criado no Microsoft Visual Basic. A referência à biblioteca de tipos do stdole é automaticamente feita por todos os projetos do Visual Basic no Visio.

Para obter informações sobre o objeto StdFont que suporte a inteface do IFontDisp

1. No grupo Código , no separador Programador , selecione Visual Basic.

2. No menu Ver , selecione Object Browser.

3. Na lista Projeto/Biblioteca , selecione stdole.

4. Em Classes, examine a classe chamada StdFont.

Exemplo

O código de exemplo seguinte mostra como obter uma referência a um objeto StdFont que transmite informações sobre os tipos de letra da aplicação e como imprimir essas informações na janela Imediato.

 
Sub DialogFont_Example() 
 
Dim objStdFont As StdFont 
Set objStdFont = Application.DialogFont 
 
 With objStdFont 
 
 Debug.Print .Bold 
 Debug.Print .CharSet 
 Debug.Print .Italic 
 Debug.Print .Name 
 Debug.Print .Size 
 Debug.Print .Strikethrough 
 Debug.Print .Underline 
 Debug.Print .Weight 
 
 End With 
 
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.