WPS 基础接口 > 文字 API 参考 > Font > 属性 > Font.StrikeThrough 属性
如果字体格式为带有删除线,则该属性值为 TrueLong 类型,可读写。

语法

表达式.StrikeThrough

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

说明

StrikeThrough 属性返回 TrueFalsewdUndefined(当返回值既可为 True,也可为 False 时取该值)。可设置为 TrueFalsewdToggle

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

示例

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

示例代码
let myDoc = ActiveDocument
let myRange = myDoc.Range(myDoc.Words.Item(1).Start, myDoc.Words.Item(3).End)
myRange.Font.StrikeThrough = true

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

示例代码
if(Selection.Type == wdSelectionNormal){
    Selection.Font.StrikeThrough = true
}
else{
    MsgBox("You need to select some text.")
}


请参阅