本示例删除插入点(折叠的所选内容)前面的字符。

With Selection
    .Collapse Direction:=wpsCollapseEnd
    .TypeBackspace
End With

 

本示例将所选内容扩展到当前段落的末尾(包括段落标记),然后删除所选内容。

With Selection
    .EndOf Unit:=wpsParagraph, Extend:=wpsExtend
    .TypeBackspace
End With