ShowTip 属性

如果为 True，则在“屏幕提示”中显示与备注相关的文本。当单击鼠标或按下任意键时，“屏幕提示”才会消失。Boolean 类型，可读写。

expression   必需。该表达式返回一个 Comment 对象。

示例

本示例显示活动文档中的第一条备注的“屏幕提示”。

If ActiveDocument.Comments.Count >= 1 Then
    ActiveDocument.Comments(1).ShowTip = True
End If

本示例显示活动文档中下一条备注的“屏幕提示”。

If ActiveDocument.Comments.Count >= 1 Then
    With Selection
        .GoTo What:=wdGotoComment, Which:=wdGotoNext
        .MoveEnd Unit:=wdWord, Count:=1
        .Comments(1).ShowTip = True
    End With
End If