曲线坐标计算程序 vba 2.3怎么用

1、这是一个个人写的工程领域的程序

2、本坐标计算程序VBA2.3属于单交点坐标正反算程序，可计算不对称和对称缓和曲线（含圆曲线）且可进行正交、斜交坐标计算，还可以辅助绘制横断面图。

程序主界面：

绘制横断面图相关图示

二、程序原理：

1、程序主要采用office excel自带的编程工具Visual Basic for applications进行编写。

2、程序辅助绘制横断面线主要是在AutoCAD中建立相对测量坐标系通过高差和偏距

CASIO4800 QXZB可计算不等缓和曲线、圆曲线上的任意中、边桩坐标：

该程序适用于计算器 CASIO fx-4800P，可计算与线路中心成任意夹角的缓和曲线、圆曲线中、边桩坐标及待测点方位角和距离。

1、DK(JD)？输入交点桩号

2、X(JD)？ 输入交点坐标X

3、Y(JD)？ 输入交点坐标Y

4、T1？ 输入第一切线长(如果只有一条切线两者都输入一致)

5、T2？ 输入第二切线长(如果只有一条切线两者都输入一致)

6、FWJ？输入直线方位角(ZH→JD)

7、A？ 输入转角：左转为负，右转为正

8、R？ 输入圆曲线半径

9、LS1？输入第一缓和曲线长(如果只有一条缓和曲线两者都输入一致)

10、LY？输入圆曲线长(L-LS1-LS2)

11、LS2？输入第二缓和曲线长(如果只有一条缓和曲线两者都输入一致)

12、X(ZJD)？输入置镜点坐标X

13、Y(ZJD)？输入置镜点坐标Y

14、JSDK？输入前视点里程

15、PL？输入偏距

16、PA？输入偏角