返回或设置 Variant 类型的值,该值确定当前文档中所有链接的颜色。该 Variant 值对应于一个十六进制的颜色值或一个枚举颜色常数。可读写。
expression.linkColor
expression 必选。返回 DispFPHTMLDocument 对象的表达式。
下列示例将活动文档中所有链接的颜色设置为蓝色。
Sub ChangeLinkColor()
'Changes the color of links in the current document
Dim objApp As FrontPage.Application
Set objApp = FrontPage.Application
'Set color of links to blue
objApp.ActiveDocument.linkColor = "3333FF"
End Sub