Font.StrikeThrough 属性 (Word)

  • 项目

如此 如果字体的格式设置为带删除线的文本。 读/写 Long。

语法

expression。 StrikeThrough

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

备注

StrikeThrough 属性返回 True、False 或 wdUndefined（当返回值既可为 True，也可为 False 时取该值）。 可以设置为 真 、 假 或 wdToggle 。

要设置或返回双删除线格式，使用 DoubleStrikeThrough 属性。

示例

本示例为活动文档中的前三个单词设置删除线格式。

Set myDoc = ActiveDocument 
Set myRange = myDoc.Range(Start:=myDoc.Words(1).Start, _ 
 End:=myDoc.Words(3).End) 
myRange.Font.StrikeThrough = True

本示例为选定文本设置删除线格式。

If Selection.Type = wdSelectionNormal Then 
 Selection.Font.StrikeThrough = True 
Else 
 MsgBox "You need to select some text." 
End If

另请参阅

Font 对象

支持和反馈

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