综合讨论区

最新回答关注的人

【源代码分享】计算软件执行时间

Private Declare Function GetTickCount Lib "kernel32" () As Long Dim i As Long Dim Trrm As Long Trrm = GetTickCount F

AcadApp 发表于 2019-12-17 08:17 阅读 1781 评论 1

【源代码分享】快速排序

数值与数组操作' OptionExplicit ' ' '数值快速排序(从小到大) '函数:NumSortAZ

AcadApp 发表于 2019-12-14 08:27 阅读 1575 评论 1

肃北县存量房交易系统登录不了

因电脑系统版本升级登录不了

新手730857 发表于 2019-12-12 18:23 阅读 1993 评论 1

【源代码分享】显示CAD选择集夹持点

Public Sub ShowSelectionSetCrips(ByVal AcadApp As AcadApplication, ByRef ss As AcadSelectionSet) Dim objEnt As AcadEnt

AcadApp 发表于 2019-12-12 08:26 阅读 1389 评论 1

房产测量外半墙画法

在计算商品房公摊面积时,阳台与客厅的分隔墙是归为外墙还是户内墙，如果是凹阳台，外墙怎么画？求助求助！或者睡着这方面的书籍介绍下，十分感谢！

新手86217 发表于 2019-12-08 23:44 阅读 5273 评论 3

AutoCAD_VBA获得模型空间尺寸

Sub GetModelSpaceSize() Dim cPnt As Variant cPnt = ThisDrawing.Application.ActiveDocument.GetVariable("

AcadApp 发表于 2019-12-08 15:20 阅读 1319 评论 1

【源代码分享】计算图幅号

Private Function GetSheetNumber(Lat As Double, Lon As Double, ScaleCode As String) As String Dim a As Integer, b As In

AcadApp 发表于 2019-12-07 08:05 阅读 2529 评论 3

【基础知识】UTM 投影介绍

1. UTM (Universal Transverse Mercator)坐标系是由美国军方在1947提出的。虽然我们仍然将其看作与“高斯－克吕格”相似的坐标系统，但实际上UTM采用了网格的分带（或分块）。除在美国本土采用Clarke 1

AcadApp 发表于 2019-12-05 08:13 阅读 3218 评论 1

BAT获得文件夹内文件列表

dir *.* /b list.txt

AcadApp 发表于 2019-12-04 08:21 阅读 1521 评论 2

ArcMap10.1中把shp转CAD坐标老出错

如题，要在GIS里面把shp通过转换工具转成CAD通用的DWG格式，但是坐标总是出问题，不得不重做两三次才能得到正确坐标的dwg，想请教一下各位大神哪里出问题了 1.我们在空白文档里面打开原始shp，坐标如下（带38°带）

新手340242 发表于 2019-12-03 17:49 阅读 8580 评论 6

千寻cors账号对比省cors网络

最近看到有很多的网友都在问千寻cors账号的定位服务怎么样？还在考虑要不要从省cors网络转用千寻cors网络。其实，作为用户来说，并不知道这种民营性质的cors网络对于测绘行业的精度如何、稳定度如何，是不是能跟省cors网络所定位的精度闭

新手819407 发表于 2019-12-02 15:22 阅读 4977 评论 1

[程序设计]二分法查找

Public Function BinSearch(ByRef strElement() As String, ByVal strKey As String) As Long '二分法查找 Dim lngLow As Long Dim

AcadApp 发表于 2019-12-01 16:36 阅读 2561 评论 4

【测绘算法】计算方位角

Public Const pi As Double = 3.14159265358979 Public Function Azimuth(x1 As Double, y1 As Double, x2 As Double, y2 As Do

AcadApp 发表于 2019-11-30 08:16 阅读 3210 评论 7

【程序设计】已知三点计算圆心和半径

数学问题：就是解三元二次方程组！ X,Y,R为未知数,x1,y1,x2,y2,x3,y3为常数 (x1-X)²-(y1-Y)²=R²(1)式 (x2-X)²-(y2-Y)²=R²(2)式 (x3-X)²

AcadApp 发表于 2019-11-29 14:41 阅读 2034 评论 1

点关于直线的距离、垂足、对称点公式

下面通过两种直线方程的形式，求解点关于直线的距离、垂足、对称点公式。问题描述1：已知点的坐标（x0，y0），直线的方程为Ax+By+C = 0；求点到直线上的距离d、点在直线上的垂足（x, y）、点关于直线的对称

AcadApp 发表于 2019-11-28 09:56 阅读 3578 评论 2

cgcs2000国家大地坐标系参数

国家大地坐标系的定义包括坐标系的原点、三个坐标轴的指向、尺度以及地球椭球的4个基本参数的定义。2000国家大地坐标系的原点为包括海洋和大气的整个地球的质量中心；2000国家大地坐标系的Z轴由原点指向历元2000.0的地球参考极的方向，该历元

AcadApp 发表于 2019-11-27 07:06 阅读 3971 评论 2

bat批量去掉文件名中的空格

@echo offsetlocal enabledelayedexpansionfor /f 'delims=' %%i in ('dir /s/b *.*') do (set 'foo=%%~nxi'set foo=!foo: =!set

AcadApp 发表于 2019-11-26 13:11 阅读 1847 评论 1

平差易安装失败，如何解决？

正版平差易无法安装，启动安装程序，logo画面过后，安装程序闪退，测试多台机器均告失败，win10和win7都不行，急用，请技术人员帮忙解决。另外感觉这个安装程序版本好老，新版程序在哪里下载？生态圈找不到。

大杨树发表于 2019-11-26 08:30 阅读 2136 评论 1

[程序设计]身份证第18位校验码规则

1、将前面的身份证号码17位数分别乘以不同的系数。从第一位到第十七位的系数分别为：7－9－10－5－8－4－2－1－6－3－7－9－10－5－8－4－2。 2、将这17位数字和系数相乘的结果相加。

AcadApp 发表于 2019-11-25 08:05 阅读 3125 评论 3

RTK移动站杆高的问题

在使用RTK测量时，杆高输入的时候，输入的地面到仪器中心的距离，还是地面到测高片的距离？

刘云旺发表于 2019-11-14 09:40 阅读 7894 评论 5

cad2014打开图纸显示不全，用快速看图显示全

图片图片

有点意思发表于 2019-11-13 14:06 阅读 4704 评论 2

怎么使用南方三鼎T66小型RTK连接千寻知寸cors账号？

南方三鼎T66小型RTK连接千寻cors账号该怎么设置呢？首先我们还是需要对这款仪器及手簿有一定的了解，然后才能在利用手簿进行cors账号设置操作的时候更熟悉更快捷。注：千寻cors账号指千寻知寸FindCM账号，下文中也是。南方三

cors账号网发表于 2019-11-12 14:29 阅读 3220 评论 1

｛收费标准｝2002工程勘察设计收费标准

《2002工程勘察设计收费标准》中2.2地面测量中，细部坐标点每格8是什么意思？图片

刘云旺发表于 2019-11-08 22:09 阅读 3185 评论 4

UG905高精度北斗GPS平板终端连接千寻知寸CORS账号

UG905（高精度版）北斗GPS平板数据采集器连接cors账号怎么操作？在进行cors账号连接操作之前，我们首先需要对这款UG905（高精度版）北斗GPS这款产品有一定的了解。比如UG905（高精度版）北斗GPS是什么？有什么功能特点

cors账号网发表于 2019-11-04 16:14 阅读 3442 评论 3