DoubleStrikeThrough 属性

如果该属性值为 True，则为指定字体的文字设置双删除线格式。可返回 True、False 或 wdUndefined（混合 True 和 False）。可设置为 True、False 或 wdToggle。Long 类型，可读写。

注意    要设置或返回单删除线格式，可使用 StrikeThrough 属性。将 DoubleStrikeThrough 设置为 True，则自动将 StrikeThrough 设置为 False，反之亦然。

示例

本示例对所选文字应用双删除线格式。

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

本示例取消活动文档中第一个单词的双删除线格式，并将该单词的第一个字母大写。

With ActiveDocument.Words(1)
    .Font.DoubleStrikeThrough = False
    .Case = wdTitleSentence
End With