[转]方位角的计算方法有多种

方位角的计算方法有多种，根据公式与工具有不同，现有四种计算方法：
　　一、测量教材上的计算方法，需要判断象限，对了解原理有一定帮助，但在实际工作中不太实用，在此不予介绍，使用此方法计算的VB或VBA代码如下：
　　Public Const PI = 3.14159265359
　　Function Pol（x1 As Double， y1 As Double， x2 As Double， y2 As Double） As Double \'计算直线的方位角
　　Dim Sub_y As Double
　　Sub_y = Abs（y2 - y1）...

Link URL: http://user.qzone.qq.com/8151190/blog/1258902988