ShowAttribsDialog Example VB

This example invokes the Annotation Attributes dialog box when the user right-clicks an annotation mark.  The type of dialog box invoked depends on the annotation type of the selected mark.

Private Sub ImgEdit1_MarkSelect(ByVal Button As Integer, ByVal Shift As Integer,
 ByVal Left As Long, ByVal Top As Long, ByVal Width As Long,
 ByVal Height As Long, ByVal MarkType As Integer, ByVal GroupName As String)
    'If user right clicks on an annotation mark using the annotation
    'select tool, the attributes dialog box for that type of mark
    'will be displayed so the user could change the mark attributes
    If Button = 2 Then     'User selected mark with a right mouse click
      ImgEdit1.ShowAttribsDialog
    End If
End Sub