添加链接
link之家
链接快照平台
  • 输入网页链接,自动生成快照
  • 标签化管理网页链接
相关文章推荐
深情的硬盘  ·  如何在Selenium ...·  1 年前    · 
怕老婆的帽子  ·  Getting the following ...·  1 年前    · 
含蓄的炒饭  ·  Vue bootstrap ...·  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 支持和反馈,获取有关如何接收支持和提供反馈的指南。