Propiedad Application.DialogFont (Visio)
Devuelve información sobre las fuentes que Microsoft Visio usa en sus cuadros de diálogo. Solo lectura.
Sintaxis
expresión. DialogFont
expresión Variable que representa un objeto Application.
Valor devuelto
IFontDisp
Comentarios
Use esta propiedad para mostrar los cuadros de diálogo en la misma fuente que los cuadros de diálogo de Visio.
El Modelo de objetos componentes (COM) proporciona una implementación estándar de un objeto Font con la interfaz IFontDisp por encima del soporte de fuentes del sistema subyacente. La interfaz IFontDisp expone las propiedades de un objeto de fuente y se implementa en la biblioteca de tipos stdole como un objeto StdFont que se puede crear en Microsoft Visual Basic. A dicha biblioteca se hace referencia automáticamente en todos los proyectos de Visual Basic de Visio.
Para obtener información sobre el objeto StdFont que admite la interfaz IFontDisp
En el grupo Código de la pestaña Desarrollador , elija Visual Basic.
En el menú Ver , elija Explorador de objetos.
En la lista Proyecto/biblioteca , elija stdole.
En la sección Clases, examine la clase denominada StdFont.
Ejemplo:
El código de ejemplo siguiente muestra cómo obtener una referencia a un objeto StdFont que transmite información sobre las fuentes de la aplicación y cómo imprimir esa información en la ventana Inmediato.
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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.