URL.AltComment

Property AltComment As String

Member of URL

The AltComment property returns or sets the alternative (“Alt”) comment of the URL.

The following code example displays all of the alternative comments contained in the active page:

Sub Test() 
 Dim sh As Shape, s As String 
 For Each sh In ActivePage.Shapes 
  If sh.URL.AltComment <> "" Then 
   s = s & sh.URL.AltComment & vbCr 
  End If 
 Next sh 
 MsgBox "The current page contains the following URL alternative 
comments: " & _ 
  vbCr & s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.