通过

Document.HeaderFooterFont 属性 (Visio)

  • 项目

指定用于页眉和页脚文本的字体。 读/写。

语法

表达式。HeaderFooterFont

表达 一个代表 Document 对象的变量。

返回值

IFontDisp

备注

COM 通过基本系统字体支持和 IFontDisp 接口提供字体对象的标准实现。 IFontDisp 接口公开字体对象的属性，并在 stdole 类型库中实现为可在 Microsoft Visual Basic 中创建的 StdFont 对象。 在 Microsoft Visio 中，stdole 类型库从所有的 Visual Basic for Applications (VBA) 项目中自动引用。

要获取有关支持 IFontDisp 接口的 StdFont 对象的信息，请执行以下操作：

  1. 在“开发工具”选项卡上的“代码”组中，单击“Visual Basic”。

  2. 在“视图”菜单上，单击“对象浏览器”。

  3. 在“工程/库”列表中，单击“stdole”。

  4. 在“类”下，检查名为 StdFont 的类。

有关 IFontDisp 接口的详细信息，请参阅 MSDN (Microsoft Developer Network) 上的 Microsoft Platform SDK。

设置 HeaderFooterFont 属性相当于在“选择字体”对话框中的“字体”框中设置值， (单击“文件”选项卡，单击“打印”，再单击“打印预览”，在“预览”组中，单击“页眉 & 页脚”，然后单击“选择字体) ”。

示例

以下示例代码显示如何使用 HeaderFooterFont 属性获取对当前 Font 对象的引用并将文档的文本字体设置为非加粗的 Arial 字体。

 
Public Sub HeaderFooterFont_Example()  
 
    Dim objStdFont As StdFont 
 
    Set objStdFont = ThisDocument.HeaderFooterFont  
    objStdFont.Name = "Arial"  
    objStdFont.Bold = False 
    Set ThisDocument.HeaderFooterFont = objStdFont  
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。