AnnHyperlinkMenuEnable example for Visual Basic
Note: Also works with Access 95 and 97.
Note: This topic is for Document/Medical only.
This example toggles the AnnHyperlinkMenuEnable property .
'Please note the following:
'LEADRasterView1 refers to a LEADRasterView control
'Global declarations
Private WithEvents RasterAnn As LEADRasterAnnotation
Private RasterAnnToolbar As LEADRasterAnnToolBar
'In the Form_Load method:
Set RasterAnn = New LEADRasterAnnotation
Set RasterAnnToolbar = New LEADRasterAnnToolBar
RasterAnn.AnnParentRasterView = LEADRasterView1
'toggle AnnHyperLinkMenu item and event
RasterAnn.AnnHyperlinkMenuEnable = Not RasterAnn.AnnHyperlinkMenuEnable
MsgBox "AnnHyperlinkMenuEnable: " & RasterAnn.AnnHyperlinkMenuEnable