如何把经纬度坐标转换为屏幕显示坐标？

比如您的经纬度坐标中心为 (0,0),您想在屏幕中以(100,100)为中心， 如果原坐标中有有点为(45,29),则在屏幕上应该为(145,71),这个值是 100+45,100-29的结果，所以可以建立一个函数:
function 转换为屏幕坐标(cp as point,p as point) as point'
'其中cp为屏幕假定的中心坐标
转换为屏幕坐标.x=cp.x+p.x
转换为屏幕坐标.y=cp.y-p.x
end function
这样就可以应对原来坐标中所有的点了