AnnNameRectLeft Example for Visual Basic

Private Sub ExampleAnnNameRect(hObject As Long)
   Dim left, top, width, height As String
   left = Str(RasterAnn.AnnNameRectLeft (hObject))
   top = Str(RasterAnn.AnnNameRectTop (hObject))
   width = Str(RasterAnn.AnnNameRectWidth (hObject))
   height = Str(RasterAnn.AnnNameRectHeight (hObject))
   MsgBox "Ann Name Rect: left[" + left + "], top[" + top + "], width[" + width + "], height[" + height + "]"