相关文章推荐
痴情的啄木鸟  ·  eclipse ...·  2 周前    · 
慈祥的消炎药  ·  gnuplot ...·  5 天前    · 
爱跑步的回锅肉  ·  inno setup ...·  1 年前    · 

表达 返回 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." 
 MsgBox "No subscript text in the selection." 
 End If 
 MsgBox "You need to select some text." 
End If

Font 对象

支持和反馈

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