shelyer1的博客

因为上海地形图要求EPS中编码是6位数的。利用“设置分组选择条件SetSelectConditionGroup”和“添加检查记录AddCheckRecord”两个函数进行筛选非6数编码。以下是相关EPScript代码:Sub OnClick()#地形非6位合法性检查SSProcess.ClearSelection SSProcess.ClearSelectCondition SSProcess.ClearSelectConditionGroups #设定分组选择过滤条件，可以把满足不同

在平台上调下的EPS地形图，存在建成房屋、棚房、建议房屋等的个别属主、名称和楼层丢失。为了避免EPS检查程序报错，可使用EPScript编写程序，自动化填入属性。Sub OnClick()''添加代码SSProcess.PushUndoMark SSProcess.ClearSelectionSSProcess.ClearSelectConditionSSProcess.ClearSelectConditionGroupsSSprocess.SetSelectCondition "SSObj

EPS获取对象属性常用的函数有：1、GetSelGeoValue( index, attrField) ’获取当前选择集指定地物的属性index----选择集地物的索引号，从0开始；attrField----要获取的属性字段名称。2、GetObjectAttr( geoID, attrField) ‘获取对象属性geoID ----- 地物IDattrField ----- 要获取的属性字段名称,见下表常用第1种获取对象属性，第2中需要先获得ID才能再进行对象属性获取。以下是EPS获

1、导线平差结果全站仪导线平差软件导出成果点格式为：点号 X Y h 标识码 序列号 时间，具体如下图，每列的空格间距还不一致。2、EPS导入点格式EPS中要求点按照:N,Y,X,h 格式导入，需要把1中的格式转位格式。平常是使用Excel表进行更改，操作较为麻烦。3、使用EPScript编写程序Sub OnClick()'添加代码dim fso,MyFile,NewFile,FileName,GetLinedim dat const ForReading=1Set fso=creat

3、For…Next以指定次数重复执行一组语句。在一般循环语句使用较多。语句结构如下：For counte r= start To end [Step step][statements][Exit For][statements]NextFor example：计算1至100的总和dim totaltotal=0for i=1 to 100 total=total+inextmsgbox("1到" & i-1 & "的总和是：" & total )

VBScript中主要有4种循环语句，分别如下：（1）Do…Loop：当（或直到）条件为True时循环；（2）While…Wend：当条件为True时循环；（3）For…Next：指定循环次数，使用计数器重复运行语句；（4）For Each…Next：对于集合中的每项或数组中的每个元素，重复执行一组语块。1、Do…Loop语句当条件为True时或条件变为True之前重复执行某语句块。主要语句结构如下：（1）先判断条件再执行Do [while / until condition][st

VBScript中有趣的函数（一）1、Inputbox()2、msgbox()3、IsNumeric()4、CBdl(), CInt(), CStr()5、ReDim6、InStr()7、Spilt()1、Inputbox()Inputbox()函数表示输入内容，注意在VBScript中没有input()。2、msgbox()msgbox()函数在对话框中显示消息。因为VBScript中没有print()函数，为了做输出提示，用msgbox会比较多。3、IsNumeric()IsNumeric(

VBScript中条件语句1、一般条件语句if…then…else是我们程序中比较简单也是最基础的条件语句。条件只对应True和Flase，出现的结果也有两种。2、对多个条件进行判断*if…then…elseif…elseif…else…*可以对多个条件进行分类输出结果。这种在以后的程序中应应用的比较广泛。3、Select case 选择性条件语句select case 机构在其开始使用一个只计算一次的简易测试表达式，表达式的结果将与结构中每个Case比较，如果匹配则执行与该Case关联的语句块

EPS中编写第一个程序一、新建脚本二、编写第一个脚本程序大家好！ 这是我第一次使用 EPS进行编程，希望通过优快云平台可以记录我的学习之旅。一、新建脚本打开EPS，点击工具-脚本编辑器，在左侧空白处右击，选择新建分组，自定义一个分组名称。程序可以放在该分组下管理。右击分组，选择新建有模脚本，在此处添加代码，如下图：二、编写第一个脚本程序Sub OnClick()'添加代码dim num,sumnum=0sum=0DO while num<10 num=num+1 sum