New Post: How to zoom to a specific location?

 Private Sub ZoomToCoordinates()
            Using CoordinateDialog = New ZoomToCoordinatesDialog(Map1)
                CoordinateDialog.ShowDialog()
            End Using
        End Sub