免费视频|新人指南|投诉删帖|广告合作|地信网APP下载

查看: 20485|回复: 216
收起左侧

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

  [复制链接]
发表于 2012-6-15 14:08 | 显示全部楼层 |阅读模式
一、程序用途:

  本坐标计算程序可计算不对称和对称缓和曲线(含圆曲线)且可进行正交、斜交坐标计算且可进行反算偏距和里程、连续坐标计算等,还可以计算结构物坐标计算,极坐标放样、线元法坐标正反算、竖曲线高程连续计算、附合导线、无定向导线平差,水准平差,还可以生成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 欢迎加入地信网!

查看全部评分

3

主题

18万

铜板

17

好友

传奇会员

Rank: 30Rank: 30Rank: 30Rank: 30Rank: 30Rank: 30Rank: 30Rank: 30

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

使用道具 举报

5

主题

1万

铜板

54

好友

VIP会员

寂寞再说爱

Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23

积分
2104

地信元老

QQ
发表于 2012-6-15 16:52 | 显示全部楼层
好程序,感谢楼主分享
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

3

主题

1万

铜板

8

好友

地信学员

xhc

Rank: 12Rank: 12Rank: 12

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

使用道具 举报

33

主题

4066

铜板

115

好友

资深会员

迷忙中...

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

积分
3835

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

QQ
发表于 2012-6-15 18:26 | 显示全部楼层
谢谢楼主的好东西
回复 支持 反对

使用道具 举报

6

主题

2万

铜板

62

好友

地信学员

Rank: 12Rank: 12Rank: 12

积分
2186

灌水勋章

发表于 2012-6-15 19:40 | 显示全部楼层
好程序,感谢楼主分享
革命尚未成功,我们还须签到! ...
回复 支持 反对

使用道具 举报

0

主题

1102

铜板

2

好友

助理工程师

Rank: 5Rank: 5

积分
394
发表于 2012-6-15 20:44 | 显示全部楼层
准备要研究相关的东西 先下下来试试


回复 支持 反对

使用道具 举报

0

主题

3132

铜板

0

好友

教授级高工

Rank: 12Rank: 12Rank: 12

积分
1276
发表于 2012-6-15 20:55 | 显示全部楼层
学习一下,谢谢!
今天终于天晴了。
回复 支持 反对

使用道具 举报

47

主题

3315

铜板

27

好友

高级工程师

Rank: 9Rank: 9Rank: 9

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

使用道具 举报

1

主题

2万

铜板

7

好友

教授级高工

Rank: 12Rank: 12Rank: 12

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

使用道具 举报

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

本版积分规则

在线客服
快速回复 返回顶部 返回列表