如果为 True,则在“屏幕提示”中显示与备注相关的文本。当单击鼠标或按下任意键时,“屏幕提示”才会消失。Boolean 类型,可读写。
expression.ShowTip
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