Проецирование точки земной поверхности, заданной широтой и долготой, в координаты на плоскости в соответствии с параметрами проекции данной системы координат (прямое преобразование).
Visual Basic:
Function GetForward(Lat As Double, Lon As Double) As ZPoint
Lat - широта точки земной поверхности в градусах.
Lon - долгота точки земной поверхности в градусах
Метод возвращает объект ZPoint. Если метод ZPoint.IsValid возвращает True, то ZPoint содержит координаты точки проекции. В противном случае метод возвращает пустой объект.
В отличие от метода Forward, может использоваться в VB Script.
Dim crs As CRS Dim pt As ZPoint Set crs = New CRS 'Сферический Меркатор crs.InitByCode"EPSG:3857" 'Проецируем точку на глобусе в указанную проекцию Set pt = crs.GetForward( 60, 30 ) 'Проверяем результат If pt.IsValid = False Then MsgBox "Ошибка преобразования" End If