发新话题
打印

共享一个计算椭球面积的模块,请大家测试使用!

共享一个计算椭球面积的模块,请大家测试使用!

调用方法

Dim aa As New xyMapTest
Debug.Print aa.LAND_TQMJ(38, 117, 38.1, 117.1)


http://www.othermap.com/dvbbs/dispbbs.asp?boardid=24&id=21371

TOP

发新话题