坐标换带计算程序说明.docVIP

PAGE  PAGE 6 坐标 换带计算 程 序 设 计 说 明 程序名：ZBHD.vbp 编译名：坐标换带计算.EXE 单 位：宣化五一六队 编制人：仝喜宽 日 期：2000年6月 编 程 说 明 程序名称：坐标换带计算.EXE （1.00版） 编程软件：Microsoft Visual Basic 6.0 系统要求：Microsoft Windows NT Server3.51或更高版本Windows 95/98。 硬件要求：* 使用486或更高处理器（推荐使用Intel Pentium处理器）、PowerPC MIPS R4xxx或Alpha AXP处理器系统。 * 16MB内存 Microsoft Mouse 或兼容设备。 编 制 人：仝喜宽 五一六队 编制日期：2000年5月—6月 主要功能： 1、大地坐标←→高斯坐标六度带 (真实值、通用值) 2、大地坐标←→高斯坐标三度带 (真实值、通用值) 3、高斯坐标六度带←→高斯坐标三度带(真实值、通用值) 4、高斯坐标六度带←→相邻六度带 (真实值、通用值) 5、高斯坐标三度带←→相邻三度带 (真实值、通用值) 6、（也可用作1.5度带换算使用，方法同上） 编制目的： 有机会参加这次大赛，为了能与更多的机算机高手进行学习、交流，也为了能解决从事地质工作的同行摆脱坐标换带计算查表的烦恼，一边学习V·Basic，一边就手边的地图投影理论资料，编写了此套程序。 理论依据： 此套程序的理论依据是高斯—克吕格投影，采用克拉索夫斯基椭球体元素（a=6378245、b=6356863.01877米，1953年）。利用现成的数学模型（《测量学》试用教材武汉地质学院编，地质出版社1983年版）编制。 计算精度： 计算大地经纬度精度可达百分之一秒，计算高斯坐标精度可达1毫米。 适用范围：我国范围及理论依据和椭球体参数与我国一至的周边国家（因我把它限制在东经0°至180°与北纬0°至90°范围内）。本程序稍作修改亦可适用其它国家使用。 使用方法： 1、大地坐标←→高斯坐标六度带 (真实值、通用值) 已知大地坐标，欲求高斯坐标六度带：以度、分、秒的形式填入“大地经度L=”与“大地纬度B=”下面的小框内，保证选中“六度带”选择按钮，然后按下“求高斯坐标”命令按钮即可，同时“高斯坐标X=”与“高斯坐标Y=”下面的小框发亮显示横纵坐标值。若求Y值的真实值，则选中“真实值”选择按钮后，再按“求高斯坐标”命令按钮，若求通用值则选中“通用值”选择按钮后，再按“求高斯坐标”命令按钮。 反之，已知高斯坐标六度带，欲求大地坐标，填入高斯坐标X、Y值，保证已选中“六度带”选择按钮；若高斯坐标Y值为真实值，则提前选中“真实值”选择按钮，若为通用值则提前选中“通用值”选择按钮，然后按下“求大地坐标”命令按钮即可，同时大地坐标值发亮显示。 本程序默认值：选中“六度带”和“通用值”选择按钮。 2、大地坐标←→高斯坐标三度带 (真实值、通用值) 方法同上，保证选中“三度带”选择按钮后再按下命令按钮即可。 3、高斯坐标六度带←→高斯坐标三度带(真实值、通用值) 已知六度带求三度带：保证输入的数据与所选中的选择按钮相符后，先按下“求大地坐标”命令按钮求出大地坐标，然后选中“三度带”选择按钮，再根据实际需要选中“真实值”或“通用值”选择按钮，最后按下“求高斯坐标”命令按钮即可。反之亦然。 4、高斯坐标六度带←→相邻六度带 (真实值、通用值) 已知六度带坐标，求相邻的东带或西带坐标：在输入高斯坐标后，保证输入值与选中的选择按钮相一致（即已选中“六度带”选择按钮），然后在最右边的带号框内输入欲求的坐标带号，按下“相邻带换带计算”命令按钮后即可。所求得坐标属性与输入坐标属性相一致。同时左边也显示相应的大地坐标，以供查验。 本程序默认值：由东带求西带坐标，即在最右边的带号框内没有填入任何值，按下“相邻带换带计算”按钮后，自动求西带坐标。 5、高斯坐标三度带←→相邻三度带 (真实值、通用值) 操作方法与上同。 6、（1.5度带操作方法亦与上同） * 清零 Clear命令按钮的作用是清空文本框内数据。 程序特点： 程序的兼容性好，计算精度高，比例尺不限。 计算校验： 大地坐标与六度带、三度带校验（通用值） 点号大地坐标六度带反验三度带反验1L、x109-15-003395385.799109-15-00.003394745.691109-15-00.00B、y30-40-0059030-40-00.0016930-40-00.002L、x124-45-005343167.876124-4