MapWinGIS:AxMap ZoomToShape

From MapWindow GIS

ZoomToShape

Zooms the map display to the specified shape in the shapefile contained by the specified layer.

VB.NET Usage

Sub ZoomToShape(LayerHandle As Integer, Shape As Integer)
            Parameters

Sample Code

    Private Sub ZoomToShape()
        Dim hndl As Integer
        'Get handle for layer at position 0 in map
        hndl = Map1.get_LayerHandle(0)
        'Zoom to shape 0 in the shapefile contained in the specified layer
        Map1.ZoomToShape(hndl, 0)
    End Sub
  

VB 6 Usage
Sub ZoomToShape(LayerHandle As Long, Shape As Long)
            Parameters

Sample Code

    Private Sub ZoomToShape()
        Dim hndl As Long
        'Get handle for layer at position 0 in map
        hndl = Map1.LayerHandle(0)
        'Zoom to shape 0 in the shapefile contained in the specified layer
        Map1.ZoomToShape hndl, 0
    End Sub