Convert LatLon to UTM using WGS84 datum
Public Sub WGS84LatLonToUTM(LL As LatLon) As UTM
Select Case Global.Glob_GPS_DATUM
Case "WGS84"
Return LatLonToUTM(6378137, 0.003352810665, LL)
Case "ED50"
Return LatLonToUTM(6378388, 0.003367003367, LL)
End select
..... ecc ecc ecc
end sub