地信网论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

免费视频|新人指南|答学员问|投诉删帖

禁止上传涉密资料|赚取铜板|附件下载

查看: 11361|回复: 180
收起左侧

[测量程序] 曲线坐标计算程序VBA 4.6

  [复制链接]
发表于 2012-6-15 14:08 | 显示全部楼层 |阅读模式
土地论坛

马上注册地信网,享受更多功能,学习更多知识,成就人生精彩!

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
一、程序用途:

  本坐标计算程序可计算不对称和对称缓和曲线(含圆曲线)且可进行正交、斜交坐标计算且可进行反算偏距和里程、连续坐标计算等,还可以计算结构物坐标计算,极坐标放样、线元法坐标正反算、竖曲线高程连续计算、附合导线、无定向导线平差,水准平差,还可以生成5800和9750数据库等。

程序主界面:
界面_1~1.JPG
程序相关界面:
untitled.png
二、程序原理:
1、程序主要采用office excel自带的编程工具Visual Basic for Applications进行编写。
2、程序主体采用的公式均为测量学(书本上的公式),准确高效。
3、程序框架构思纯属个人思维,界面美观可直接打印,单元格采用按钮化设计,操作简便快捷。
三、更新记录:
1、取消了表格单元格所有密码(或密码为空)可进行任意编写修改和排版。“请勿删除或插入单元格,否则会良成不必要的错误”。
2、取消了页眉版权(减少了用户每次打印时修改页眉设置的繁琐)。
3、合理化新增了相应部位按钮及某些修正(每次计算完毕需返回时请点击“返回目录”按钮)。
4、新增了“无定向导线平差”。
5、新增了“符合导线平差”。
本表需启用"宏"即可运行,否则禁止宏运行时点击按钮会没有反映,Office Excel 启用"宏"方法如下:
Office Excel 2003版:工具>>>宏>>>安全性>>>选择较低的安全级别>>>重新打开文件即可运行。
Office Excel 2007版:Office按钮>>>Excel选项>>>信任中心>>>信任中心设置>>>宏设置>>>启用所有宏。
下载地址:
游客,如果您要查看本帖隐藏内容请回复



评分

参与人数 2铜板 +7 收起 理由
abcyt + 2 好资源一定要顶!
一水孤尘 + 5 欢迎加入地信网!

查看全部评分

发表于 2012-6-15 15:26 | 显示全部楼层
好程序,顶一下
回复 支持 反对

使用道具 举报

3

主题

1万

铜板

52

好友

教授级高工

寂寞再说爱

Rank: 12Rank: 12Rank: 12

积分
1635
QQ
发表于 2012-6-15 16:52 | 显示全部楼层
地信网论坛版规和新人指南
好程序,感谢楼主分享
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

3

主题

1万

铜板

8

好友

地信学员

xhc

Rank: 12Rank: 12Rank: 12

积分
909
发表于 2012-6-15 17:59 | 显示全部楼层
RE: 曲线坐标计算程序VBA 4.6 [修改]  还可输入 80 个字符
大家好
回复 支持 反对

使用道具 举报

33

主题

3891

铜板

115

好友

资深会员

迷忙中...

Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18

积分
3869

精华勋章成就学员勋章灌水勋章贡献勋章宣传勋章

QQ
发表于 2012-6-15 18:26 | 显示全部楼层
地信网论坛发帖规范—规范发帖,方便你我他!
谢谢楼主的好东西
回复 支持 反对

使用道具 举报

6

主题

2万

铜板

62

好友

地信学员

Rank: 12Rank: 12Rank: 12

积分
2204

灌水勋章

发表于 2012-6-15 19:40 | 显示全部楼层
《涉密地质资料管理细则》必读
好程序,感谢楼主分享
革命尚未成功,我们还须签到! ...
回复 支持 反对

使用道具 举报

0

主题

1102

铜板

2

好友

助理工程师

Rank: 5Rank: 5

积分
394
发表于 2012-6-15 20:44 | 显示全部楼层
快速提高会员级别和总积分的说明与方法
准备要研究相关的东西 先下下来试试


回复 支持 反对

使用道具 举报

0

主题

3133

铜板

0

好友

教授级高工

Rank: 12Rank: 12Rank: 12

积分
1305
发表于 2012-6-15 20:55 | 显示全部楼层
地信网论坛》管理制度(试行
学习一下,谢谢!
今天终于天晴了。
回复 支持 反对

使用道具 举报

47

主题

3315

铜板

27

好友

高级工程师

Rank: 9Rank: 9Rank: 9

积分
708
发表于 2012-6-15 21:20 | 显示全部楼层
谢谢楼主共享!
回复 支持 反对

使用道具 举报

1

主题

9903

铜板

7

好友

高级工程师

Rank: 9Rank: 9Rank: 9

积分
806
QQ
发表于 2012-6-15 21:28 | 显示全部楼层
学习学习 看看
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

土流网招商加盟广告
在线客服

新人指南|地信论坛 ( 湘ICP备14003170号-5 湖南土流信息有限公司 版权所有 关于地信 联系方式 邮箱登陆

湘公网安备 43010302000511号

Powered by Discuz! X3.2

快速回复 返回顶部 返回列表