Word) (Font.Subscript 属性

如此 如果字体的格式设置为下标。 读/写 Long。

语法

表达式。标

表达 返回 Font 对象的表达式。

备注

返回 True、 False 或 wdUndefined (true 和 False) 的混合。 可以设置为 真 、 假 或 wdToggle 。

下标 属性设置为 True 将 上标 属性设置为 False ，反之亦然。

示例

本示例在活动文档的开头插入文本，并将第十个字符设为下标。

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
myRange.InsertAfter "Water = H20" 
myRange.Characters(10).Font.Subscript = True

本示例检查所选文本的下标格式。

If Selection.Type = wdSelectionNormal Then 
 mySel = Selection.Font.Subscript 
 If mySel = wdUndefined Or mySel = True Then 
 MsgBox "Subscript text exists in the selection." 
 Else 
 MsgBox "No subscript text in the selection." 
 End If 
Else 
 MsgBox "You need to select some text." 
End If

另请参阅

Font 对象

支持和反馈

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