MapWinGIS:AxMap ZoomToLayer

From MapWindow GIS

ZoomToLayer

Zooms the map display to the specified layer.

VB.NET Usage

Sub ZoomToLayer(LayerHandle As Integer)
            Parameters

Sample Code

    Private Sub ZoomToLayer()
        Dim hndl As Integer
        'Get handle for layer at position 0 in map
        hndl = Map1.get_LayerHandle(0)
        'Zoom to the layer at position 0 in the map
        Map1.ZoomToLayer(hndl)
    End Sub
  

VB 6 Usage
Sub ZoomToLayer(LayerHandle As Long)
            Parameters

Sample Code

    Private Sub ZoomToLayer()
        Dim hndl As Long
        'Get handle for layer at position 0 in map
        hndl = Map1.LayerHandle(0)
        'Zoom to the layer at position 0 in the map
        Map1.ZoomToLayer (hndl)
    End Sub