Share via

AfterViewChange event

  • Article

Occurs when the view of the map has changed and the map is done repainting to that viewpoint.

Applies to

Objects: Map, MappointControl

Syntax

object .AfterViewChange

Parameters

Part

Description

object

An expression that evaluates to a Map or MappointControl object.

Remarks

  • Setting the Projection property of the Map object causes the AfterViewChange event to occur, even though the map view may not appear to change.

  • Do not make this event infinitely recursive by calling itself or causing itself to be called.

  • Do not create a modal dialog box—including message boxes—during this event.

Example

  Dim WithEvents objApp As MapPoint.Application
  Dim WithEvents objMap As MapPoint.Map

  Private Sub Form_Load()
    'Set up the application
    Set objApp = CreateObject("mappoint.application")
    Set objMap = objApp.ActiveMap
    objApp.Visible = True
    objApp.UserControl = True
  End Sub
  Private Sub Command1_Click()
    'Zoom in on the map
    objMap.ZoomIn
  End Sub

  Private Sub objMap_AfterViewChange()
    List1.AddItem "AfterViewChange event fired"
  End Sub