[毕业设计 论文 精品]基于excel表的附合导线计算程序

毕业设计基于EXCEL表的附合导线计算程序系部测绘工程系专业名称工程测量指导教师姓名二一年十二月毕业设计（论文）评定表姓名学号存档号系别测绘工程系专业工程测量班级80812毕业论文（设计）题目基于EXCEL表的附合导线计算程序指导教师评语签名2010年月日答辩委员会意见签名2010年月日备注毕业设计（论文）任务书A1A0A2A3学生姓名学号指导教师姓名教授系部测绘工程系毕业设计（论文）题目基于EXCEL表的附合导线计算程序毕业设计（论文）要求1、完成附和导线的EXCEL计算程序的编写2、输入数据验证程序的正确性和可行性3、数据输入计算4、论文格式完成期限和主要措施2010102020101031论文选题，拟定设计（论文）计划（10天）201011120101120整理资料，收集文献，编写提纲（20天）2010111120101120准备初稿，排版（10天）2010112120101130撰写论文，定稿（10天）201012120101210打印、投交论文为答辩作准备（10天）主要参考文献1李孟山、张文彦编工程测量概论西安西安地图出版社，20041601791802美JOHNWALKENBAG70KG14891，G457G40G91G70EL200G22G20652G13435G57G37G36编程G4465G1868G458G11017G4388工业出版社G22G4392G12089G1815G3281G4490G7643准G7044版G42G37G2400262007工程测量G16280G14551G8506G8733G3835学测绘学G19510指导教师G12626名G5192G7388G7097A4A5A6A71目录G6700要2G125441G12468附G2524导线的概G17860311附G2524导线的G12628G1183312附G2524导线的G3818业工作3G125442G12468附G2524导线的计算G2419理521附G2524导线的G7053G1313G16294计算G1856式522附G2524导线的G3364G7643计算G1856式5G125443G12468附G2524导线程序编G2058731VBAG16833G16340G12628G1183732设计附G2524导线的EXCELG15932格833计算G5062G11705G7053G1313G16294934G16294G5242计算G1207G11733编写1135G3364G7643计算G1207G11733编写2036G3364G7643G13479G7536的计算G994输出21G125444G12468程序的G5224G110042341附G2524导线计算程序的G1363G1100423411程序G1363G11004G16840G71382342程序的验证24421输入G5062G11705G7477G122624421计算成G753624G125445G12468G1852文G5647G1347926G14280G1688627参考文献28A4A5A6A72摘要G3324测量工作G1025，导线测量G2356G11540G18337要地G1313，G7092论G7171G19093G17347测量、G1856G17347测量、G7737G7765测量G17836G7171地G5430图测绘，导线的测量计算G18129G7171G19762G5132G18337要的G10627G14422G452G125441G12468主要G1183G13473G1114附G2524导线的G3818业工作和G12946G5242要求G727G125442G12468G1183G13473G1114附G2524导线的G1881业计算G727G125443G12468主要G1183G13473G1114G2045G11004EXCEL编程G16833G16340VBAG4557附G2524导线的计算G727G125444G12468G1183G13473G4557EXCEL程序的G5224G11004和验证A8关键词VBA；附合导线；EXCEL；编程A4A5A6A73第1章附合导线的概述11附合导线的简介G3926图11G6164G12046G1209G20652G13435G6523G2058G9869G36为G17227G3999G9869，G37G36G7053G2533为G17227G3999G7053G2533，G13475G17819G14521G5190G1022导线G9869G2530，附G2524G2052G2490G3818G980G1022G20652G13435G6523G2058G9869G38和G5062G11705G7053G2533G38G39G17805G990，G17837G12193导线G12228为附G2524导线。图11附G2524导线G12046G5859图12附合导线的外业工作（1）选G9869G7693据测G2318的地G5430G5785况选择G980定数量的导线G9869G452G3324选G9869之前，G5224收集测G2318G5062有的小比例尺地G5430图和G6523G2058G9869的成G7536资料，然G2530G3324地G5430图G990拟定的布设G7053案，最G2530G2052野G3818进行实地踏勘，G7693据实地G5785况进行修改G994调整，选定G9869G1313并建立G7643志G452G14521G7092地G5430图可G2045G11004时，实地踏勘选G9869G452（2）水平G16294观测G3324附G2524导线G1025G980般测量其左G16294，导线观测G16294的G12946G5242要求见G1593211（G22）G17805长测量导线G17805长测量可G1209G11004光G11017测距仪测定，也可G1209G11004钢尺丈量G452G14521G11004测距仪测定，A9A10A11A124G5224测定导线G17805的水平长G5242G727G14521G11004钢尺丈量，G4557G980、二、三G13435导线，G5224采G11004G12946密量距法进行丈量G727G4557于图G7693导线，则G11004G980般G7053法往返进行丈量，其相G4557误差G980般不得超G178191/G22000G3324特殊困哪地G2318也不得超G178191/1000G1593211各G13435导线测量的主要技术指G7643注G15932G1025N为测G16294G1022数G727M为测图比例尺分母G452等G13435导线长G5242/KM平均G17805长/KM测G16294G1025误差测回数G16294G5242闭G2524差导线G1852长相G4557闭G2524差G39J6G39J2G980G1343540G24G244210N1/1G24000二G134352402G248G22116N1/10000三G134351201122124N1/G24000图G769310M1G24倍测图最G3835视距20140N（首G13435）40NG980般1/2000A9A10A11A125第2章附合导线的计算原理21附合导线的方位角计算公式（1）G16294G5242G994弧G5242转换G1856式弧G5242G5242/180分/18060秒/（1806060）（21）（2）G3364G7643计反算1212ARCTANXXYY（22）当G3324G12544G980象限时当G3324G12544二象限时180当G3324G12544三象限时180当G3324G12544四象限时G2260（G22）推算导线各G17805的G3364G7643G7053G1313G16294A13A14A15A16A14A15180180（2G22）（G22）附G2524导线G16294G5242闭G2524差的计算CDBACDCDNF180（24）（4）附G2524导线G16294G5242改正数的计算NFFI（2G24）注观测G16294G5242加G990G16294G5242改正数即为改正G2530G16294G5242值G45222附合导线的坐标计算公式（1）G3364G7643闭G2524差的计算A17A18A19A206ACYACXYYYFXXXFA21A21（26）（2）G3364G7643增量的计算1212SINCOS12121212DYDX（27）（G22）G91、YG3364G7643改正数的计算IYIYIXIXDDFVDDFV（28）（4）G3364G7643的计算2222AAAAYYYXXX（29）注A2X、A2Y为改正G2530的G3364G7643增量值，A22A23A24A257第3章附合导线程序编制31VBA语言简介G57G37G36（VISUALBASIG70FORAPPLIG70ATION）G16833G16340G12628G1183G57ISUALG37ASIG70FORG36PPLIG70ATIONS（G12628G12228G57G37G36）G7171G7044G980G1207G7643准宏G16833G16340，G7171基于G57ISUALG37ASIG70FORWINDOWS发展而来的G452它G994传统的宏G16833G16340不同，传统的宏G16833G16340不具有G20652G13435G16833G16340的特征，没有面G2533G4557象的程序设计概念和G7053法G452而G57G37G36提供G1114面G2533G4557象的程序设计G7053法，提供G1114相当完整的程序设计G16833G16340G452G57G37G36G7143于学G1076G6496G6581，可G1209G1363G11004宏G16772G5417G3132G16772G5417G11004G6155的各G12193G6817作并G4570其转换为G57G37G36程序G1207G11733G452G17837G7691G11004G6155可G1209G4493G7143地G4570G7097G5132工作转换为G57G37G36程序G1207G11733，G1363工作G14270G2172G2282G452G3252G8504，G4557于G3324工作G1025G19668要G13475G5132G1363G11004G50FFIG70EG3883G16025G17731G1226的G11004G6155，学G11004G57G37G36有G2173于G1363工作G14270G2172G2282，提G20652工作G6940G10587G452G2490G3818，G11013于G57G37G36可G1209G11464G6521G5224G11004G50FFIG70EG3883G16025G17731G1226的各G20045G5390G3835G2163G14033，G6164G1209G4557于程序设计G1166G2604的程序设计和G5332发G7368加G7053G1427G5567G6475G452G40G91EG70L具有G5390G3835的G17828算G2163G14033，它G14033G6365G10043G11004G6155的G5859图进行各G12193G3809G7446的G17828算（G2265G6336编写G1856式、调G11004G2001数等）G452G57G37G36G7171基于G57ISUALG37ASIG70发展而来的，它G1216具有相G1296的G16833G16340G13479G7512G452G57ISUALG37ASIG70G7171MIG70ROSOFT的主要图G5430G11040面G5332发工具，G57G37G36G240（G1146即G57G37G3697）则G7171G57ISUALG37ASIG70G240的G4388集G452G57ISUALG37ASIG70G7171G11013G37ASIG70发展而来的G12544四G1207G16833G16340G452G57ISUALG37ASIG70作为G980G3883G10432立的WINDOWS系统G5332发工具，可G11004于G5332发WINDOWSG10627G3671G991的各G12879G5224G11004程序，G7171G980G12193可视G2282的、面G2533G4557象的、采G11004G1119G1226G20549G2172G7053式的G13479G7512G2282G20652G13435程序设计G16833G16340G452它具有G20652G6940G10587、G12628G2345G7143学G2462G2163G14033G5390G3835的特G9869G452G57G37的程序G16833G16340G12628G2345、G1427G6475，G2045G11004其G1119G1226G20549G2172的编程G7438G2058，G7044G20074G7143G11004的可视G2282设计工具，并G1363G11004WINDOWSG5224G11004程序G6521G2487（G36G51G44）G2001数，采G11004G2172G5589G19154G6521G5223（G39G47G47）、G2172G5589数据交换（G39G39G40）、G4557象的G19154G6521G994G4896入（G50G47G40）G1209G2462G5332G6930式数据G5223G16787G19394（G50G39G37G38）等技术，可G1209G20652G6940、G5567G17907地编G2058出WINDOWSG10627G3671G991G2163G14033G5390G3835、图G5430G11040面G1028G4512的G5224G11004G17731G1226系统G452A26A27A28A298G57ISUALG37ASIG70程序G5468G3835G980部分G1209可视（G57ISUAL）G5430式实G10628，G17837G5859G2631G11540G3324设计G19466G8585G4613可G1209G11487G2052程序G17828行的G4643G5161G11023面，G11004G6155可G1209G3324设计时G14033G3827G7053G1427地改G2172G11023面图G1699、G3835小、G20080G14406等，G11464G2052G9397G5859为G8502G452G57G37的G11004G6155可G1209G7171G13582G1059WINDOWSG2462G38G16833G16340G5332发G13475验的G999业G17731G1226G1166G2604，也可G1209G7171具有G980定WINDOWSG5332发G13475验的G999业G1166G2604，G57G37的可视G2282编程G7053法G1363得G2419来G13333G10724G7555G10169、G1208G1166生G11043的WINDOWSG5224G11004程序设计G2476得G17743G7506G14270G3926、G3949G17271G8190生G452G1209往的WINDOWSG5224G11004程序G5332发工具G3324设计图G5430G11004G6155G11040面时，G18129G7171采G11004编程的G7053法，并G1288G19555G3835量的计算G1231G2165，G980G1022G3835G3423G5224G11004程序G13434有90G8的程序G1207G11733G11004来G3800理G11004G6155G11040面，而G1000G3324程序设计G17819程G1025不G14033G11487G2052G11040面G7186G12046的G6940G7536，G2494有G3324程序G6203行时G6177G14033观G4531G2052，G3926G7536G11040面G6940G7536不G1351，G17836G19668要回G2052程序G1025G2447修改G452G57ISUALG37ASIG70提供G1114G7044G20074的可视G2282设计工具，G5051G3949地G4570WINDOWSG11040面设计的G3809G7446性G4565G16025G17227来，程序G5332发G1166G2604不G5529G1889为G11040面设计而编写G3835量程序G1207G11733，仅G19668采G11004G10628有工具G6365设计者要求的布局，G3324G4643G5161G990G11023出G6164G19668G11040面，并为各图G5430G4557象设置属性即可，G57G37G14270G2172产生G11040面设计G1207G11733，G17837G7691G1427G4570G1119先编G2058好的G6523G1226可视地连G6521G2052G980G17227，G7512成G980G1022G19555时可调整的G11040面G452G57G37G36不但继承G1114G57G37的G5332发G7438G2058，而G1000G57G37G36G17836具有G994G57G37相G1296的G16833G16340G13479G7512，它G1216的集成G5332发G10627G3671G44G39G40（G44NTERGRATEDG39EVELOPMENTG40NVIRONMENT）也几乎相同G452但G7171，G13475G17819优G2282，G57G37G36G999门G11004于G50FFIG70E的各G5224G11004程序G452G57G37可G17828行G11464G6521来G14270WINDOWS9G24或NT桌面G990的G5224G11004程序，而G57G37G36的G20045目（G51ROJEG70T）仅G11013G1363G11004G57G37G36的G40G91G70EL、WORD、G51OWERG51OINT等G12228为宿主（HOST）的G50FFIG70EG5224G11004程序（G36PPLIG70ATION）来调G11004G452目前，G19555G11540测绘技术的不断发展，G3324G980些小地G2318的G3835比例尺测图G1025，做G6523G2058G5224G11004较多的依然G7171导线测量的G7053法G452G3324导线测量G1025，野G3818数据的采集G11004G1852站仪可G1209G16840G7053G1427G5567G6475，但G7171其G1881业的计算G11004手工却比较麻烦，而G1000费时费力G452而计算G7438的G5224G11004解决G1114G17837G980G19394题，本文G4613G1209VBAG16833G16340来G1183G13473附G2524导线的G1881业计算G45232设计附合导线的EXCEL表格G11013于采G11004G1114EXCEL的G5332发程序，G6164G1209采G11004的窗体G7171EXCELG14270身的G13475G1868窗体，G7092G19668G1889G2447改G2172，G17837G7691也G7368加G7053G1427G11004G6155，G2494G19668G3324EXCEL窗体G990添加G6164G19668的空间G4613可G1209G1114G452A30A31A32A339图（31）EXCEL导线计算的窗体33计算已知方位角（1）G5062G11705G6523G2058G9869的填入G3926图（32）图32附G2524导线G7053G1313G16294计算G15932注红G14406字体为输入部分G452（2）G3364G7643G7053G1313G16294弧G5242G6365G1856式（22）进行计算编写程序“IFC4C30,IFB4B30,ATANC4C3/B4B3,ATANC4C3/B4B3231415926535,ATANC4C3/B4B331415926535”填入G452G3926图13A34A35A36A3710图33计算G7053G1313G16294G1856式的填入（3）G4570弧G5242转换为G5242G6365G1856式（G5242弧G5242180/）分别G3324G5242、分、秒里填入G1856式G5242转换INTG4/31415926180，G3926图34图34G5242转换G1856式填入分转换INTG4/31415926180D460，G3926图35图35分转换G1856式填入秒转换INTG4/31415926180D460E460，G3926图36A34A35A36A3711图36秒转换G1856式填入得G2052G7053G1313G16294计算G13479G7536G3926图37图37G5062G11705G9869G7053G1313G16294计算G13479G753634角度计算代码编写G1207G11733的编写G7171G3324VISUALBASICFORAPPLICATION的G1207G11733编辑G3132里编写的，打G5332EXCELG2530G6365ALTF11G1427可G1209打G5332G1207G11733编辑G3132G452G3926图38图38VBAG1207G11733编辑G11040面A38A39A40A4112（1）首先G3324通G11004声G7138部分定义两G1022G2476量，N和I，NG1207G15932加密G9869的G1022数，IG7171G2476量G1207G15932每G980G1022加密G9869的G9869号，G1207G11733G3926G991G980G1022G2172G5589DIMIASINTEGERG4570G2172G5589G2476量I定义为INTEGERG452（整G3423数）DIMNASLONGG4570G2476量N定义为LONGG452（长整G3423）（2）编写输入加密G9869G1022数的G1207G11733，G6365G991G8504G6365钮的的时候要求输入加密G9869G1022数，G1209G1427程序G14270G2172生成G980G1022相G5224的G15932格，为G8504G6365钮编写G1207G11733G3926G991PRIVATESUBCOMMANDBUTTON1_CLICK当G6365钮被G6365G991的时候G6203行SUBG17819程G452NINPUTBOX“请输入G1022数”,“请输入”把G11004G6155输入INPUTBOX的加密G9869的G5647G1022数赋值G1022G2476量NG452SHEET1CELLS7,1“A”SHEET1CELLS8,1“B”SHEET1CELLS7,19“A”SHEET1CELLS8,19“B”当G6365钮被G6365G991的时候把“A、B”填入G2052指定的G2345G1815格里，SHEET1CELLS（7,8）G1207G15932该G2345G1815格的G1313置G7171G12544G980G1022工作薄的G12544七列的G12544八行G452FORI0TON2SHEET1CELLSI9,1I1SHEET1CELLSI9,19I1SHEET1CELLSI6,1INTERIORCOLORINDEX4SHEET1CELLSI6,19INTERIORCOLORINDEX4SHEET1CELLSI8,2BORDERSLINESTYLE3SHEET1CELLSI8,3BORDERSLINESTYLE3SHEET1CELLSI8,4BORDERSLINESTYLE3SHEET1CELLSI8,12BORDERSLINESTYLE3NEXTIA38A39A40A4113通G17819FORNEXT循G10627来创建我G1216G19668要的G15932格G15932格的G3835小取决于加密G9869的G1022数G452SHEET1CELLSN9,1“C”SHEET1CELLSN10,1“D”SHEET1CELLSN9,1INTERIORCOLORINDEX4SHEET1CELLSN10,1INTERIORCOLORINDEX4SHEET1CELLSN9,19“C”SHEET1CELLSN10,19“D”SHEET1CELLSN9,19INTERIORCOLORINDEX4SHEET1CELLSN10,19INTERIORCOLORINDEX4G4570“C、D”填入指定的G2345G1815格，并G1000指定该G2345G1815格的格式G452SHEET1CELLSN11,1“G5647和”SHEET1CELLSN11,1INTERIORCOLORINDEX0SHEET1CELLSN11,2INTERIORCOLORINDEX0SHEET1CELLSN11,3INTERIORCOLORINDEX0SHEET1CELLSN11,4INTERIORCOLORINDEX0SHEET1CELLSN11,12INTERIORCOLORINDEX0ENDSUB通G17819G1209G990G1207G11733，G4613完成G1114G4557数据输入的G6817作，G2494G19668要G6365G991输入G6365钮，填入加密G9869G1022数，G4613会生成相G5224的附G2524导线计算G15932格G3926图39图39生成的附G2524导线计算G15932格（3）清除G1881G4493，当我G1216G3324做完G980G3883计算的时候G2490存G1114数据G1209G2530，EXCELG1881G2419A38A39A40A4114先的数据并不会G14270G2172消失，G17837G4613G19668要我G1216通G17819G1207G11733来实G10628，实G10628清除G2163G14033的G1207G11733G3926G991PRIVATESUBCOMMANDBUTTON2_CLICK当清除G6365钮被G6365G991的时候G6203行G1209G991G1207G11733RANGE“A7S100”“”G3324G2345G1815格A7G2052S100G14551围G1881G2345G1815格G1881值为空，也G4613G7171数清空G2345G1815格理得G1881G4493G452RANGE“A7S100”INTERIORCOLORINDEX0RANGE“A7S100”BORDERSLINESTYLE0设置G2345G1815格的底G14406和G17805框G7691式G452ENDSUB（4）设计计算G1207G11733G452计算G1207G11733的设计G7171G7693据倒G7186得计算G1856式来的，G991面G4613G1207G11733和G1856式进行G980步G980步饿解析G452导线的技术G7171G11013许多的计算来完成的，为G1114G1427于程序的G12628G2282，我把G6164有的计算G1207G11733统统G6930G2052G1114G980G1022“计算”G6365钮G991G452PRIVATESUBCOMMANDBUTTON3_CLICK当COMMANDBUTTON3G6365钮被G6365G991时G6203行G1209G991的计算G1207G11733G452首先G7171定义参数，G11013于G3818业观测的G16294G5242值G7171G5242、分、秒格式的G6164G1209首先要G4557G5242分秒格式的数据进行G3800理G452G4557G5242、分、秒的G3800理G19668要G3800理两G12193格式G980G12193G7171G5242的小数G9869G5430式，G980G12193G7171弧G5242G5430式G452G5242的小数G9869G5430式G4613G7171G4570分、秒换算成G5242G452G5242的弧G5242G5430式G4613G7171G4570G5242分秒换算成弧G5242G452具体步骤G4570G3324G1209G991G1207G11733G1025详细讲解G452DIMZHMASDOUBLEDIMZHMAASDOUBLEDIMZHMA1ASDOUBLEDIMZHFASDOUBLEDIMZHFAASDOUBLEDIMZHFA1ASDOUBLEDIMZHDASDOUBLEDIMZHDAASDOUBLEDIMZHDA1ASDOUBLEDIMJLHASDOUBLEDIMJLH1ASDOUBLEDIMZLXASDOUBLEDIMCZLYASDOUBLEDIMZLYASDOUBLEDIMCZLXA38A39A40A4115ASDOUBLEDIMZLXH,ZLYH,ZLXH1,ZLYH1,ZLXH2,ZLYH2,GXH,GYHASDOUBLEDIMGZLXASDOUBLEDIMGZLYASDOUBLEDIMZBZXASDOUBLEDIMZBZYASDOUBLEDIMFBHC,CZLXH,CZLYHASDOUBLEDIMJLASDOUBLEDIMMASDOUBLEDIMFASDOUBLEDIMDASDOUBLEDIMHUDUASDOUBLEDIMFWJASDOUBLEDIMFRASDOUBLEDIMFR1ASDOUBLEDIMAAB,ACD,FPCASDOUBLEDIMFREENUMB,BTH,MINIASDOUBLEG1209G990G1852部G7171定义的计算G1025会G11004G2052的参数具体含义为ZHMG1207G15932输入的秒的G5647G2524，ZHFG1207G15932输入的分的G5647和，ZHDG1207G15932输入的G5242的G5647和，ZHMA1G1207G15932G4570秒换算为G5242的小数G9869G5430式的G5647和，ZHFA1G1207G15932G4570分换算为G5242的小数G5430式的G5647和G452JLHG1207G15932输入的距离的G5647和G452D（）、F（）、M（）分别G1207G15932输入的每G980G1022G5242、分、秒，G4570其G6930入数组G1025，JL（）G1207G15932输入的距离G4570每G980G1022距离G6930入G2052G8504数组G1025G452IFN0THENMSGBOX“请输入加密G9869的G1022数”ENDIFIFG16833句判断输入的加密G9869G1022数NG7171否为0，G3926G7536加密G9869G1022数为0G6203行G1209G990G16833句，弹出G4557话框，G4557话框G10628实G1881G4493为“请输入加密G9869的G1022数”G452G3926G7536N不G71710那么G6203行G1209G991的IFG16833句G452IFN0THENFREENUMB99999FREENUMBG7171定义的G980G1022极限数值，G11004来和输入的距离进行比较最终找出输入距离的最小值G452REDIMFWJIASDOUBLEA38A39A40A4116REDIMMIASDOUBLEREDIMFIASDOUBLEREDIMDIASDOUBLEREDIMJLIASDOUBLEREDIMHUDUIASDOUBLEG4557定义的空数组进行G18337G7044定义G452FORI1TON2MIVALSHEET1CELLSI7,4G4570输入的秒值给数组FIVALSHEET1CELLSI7,3G4570输入的分值给数组DIVALSHEET1CELLSI7,2G4570输入的G5242值给数组JLIVALSHEET1CELLSI8,12G4570输入的距赋值给数组IFJLI0THENIFJLISHEET1CELLSN9,12THENA38A39A40A4119FREENUMBVALSHEET1CELLSN9,12MININ9ENDIF判断观测距离的最小值并G1000得G2052该值G6164G3324的行值G452FPCFIXROUNDFR3600/N2平均分G18209差G452FORI1TON2SHEET1CELLSI7,50FPCNEXTIG4570各G16294G5242的改正值G7186G12046G3324指定G2345G1815格G1881G452G7693据G1209G990的计算G8504时的参数MINIG5062G13475G7171最小的距离值G6164G3324的那G1022G2345G1815格的行数，G6164G1209G3324G8504行G16294G5242的改正值要加G990除G2447G2530的G1325数G1207G11733G3926G991SHEET1CELLSMINI,50FPCROUNDFR3600MODN21推算各G1022G7053G1313G16294G1207G11733的编写G7693据G1856式（2G22）来计算，G11013于我G1216采G11004的G7171左G2503G6164G1209G4613采G11004G1856式A42A43A44A45180来计算G452FORI1TON2HUDUIDIFI/60MI/3600VALSHEET1CELLSI7,5/3600SHEET1CELLSI7,6INTHUDUISHEET1CELLSI7,7INTHUDUIINTHUDUI60SHEET1CELLSI7,8HUDUIINTHUDUI60INTHUDUIINTHUDUI6060NEXTIFORI1TON2BTHBTHHUDUIFWJIAABI180BTHSHEET1CELLSI8,9INTFWJISHEET1CELLSI8,10INTFWJIINTFWJI60A46A47A48A4920SHEET1CELLSI8,11FWJIINTFWJI60INTFWJIINTFWJI6060NEXTI通G17819G1209G990G1207G11733推算出G1114G7053G1313G16294FWJ（）并把G1194G1216G7186G12046G3324指定的G2345G1815格G1881G45235坐标计算代码编写计算G3364G7643增量G7693据G1856式（27）进行计算，G3324进行G8504计算的时候要G4570G7053G1313G16294的换算成弧G5242值G11013于G3324G990面的G1207G11733G1025G7053G1313G16294G5062G13475被G3800理成G1114G5242分秒的小数的G5430式G6164G1209G3324G17837里转换为弧G5242G2494G19668要G6365G1856式（G16294G5242/180）G4613可G1209G1114G452REDIMZLXIASDOUBLEREDIMZLYIASDOUBLEFORI1TON1ZLXIFORMATJLICOSFWJI31415926/180,“0000”ZLYIFORMATJLISINFWJI31415926/180,“0000”ZLXHZLXHZLXIZLYHZLYHZLYINEXTIG1209G990G1207G11733G4613完成G1114G4557G3364G7643增量的计算，并G1000计算出G1114G6164有X、Y增量的和G4522G3364G7643增量的改正理论G990通G17819推算得G2052的CG9869的G3364G7643G5224该和G5062G11705的数据相同，但G7171G11013于测量误差的存G3324得G2052的G13479G7536实际不同G17837G4613G19668要我G1216来G4557G3364G7643增量来进行调整G452G7693据G1856式（28）G4557G3364G7643增量的改正计算G6365G1856式计算通G17819G1207G11733来实G10628G4613G7171G3926G991G1207G11733VALSHEET1CELLS8,17/JLHJLIVALSHEET1CELLS8,18/JLHJLI然G2530G1889把计算得G2052的改正值分G18209给G3364G7643增量G11013G3926G991G1207G11733来完成G452REDIMGZLXIASDOUBLEREDIMGZLYIASDOUBLEREDIMZBZXIASDOUBLEA50A51A52A5321REDIMZBZYIASDOUBLEREDIMCZLXIASDOUBLEREDIMCZLYIASDOUBLEFORI1TON1CZLXIFORMAT0ZLXHVALSHEET1CELLSN9,17VALSHEET1CELLS8,17/JLHJLI,“0000”CZLYIFORMAT0ZLYHVALSHEET1CELLSN9,18VALSHEET1CELLS8,18/JLHJLI,“0000”GZLXIZLXICZLXIGZLYIZLYICZLYIZLXH2ZLXH2GZLXIZLYH2ZLYH2GZLYIGXHGXHGZLXIGYHGYHGZLYICZLXHCZLXHCZLXICZLYHCZLYHCZLYI36坐标结果的计算与输出通G17819G1209G990G1207G11733得G2052G1114改正G2530的G3364G7643值，得G2052改正G2530的G3364G7643值G6365G1856式（29）进行计算ZBZXIVALSHEET1CELLS8,17ZLXH2ZBZYIVALSHEET1CELLS8,18ZLYH2SHEET1CELLSI8,13CZLXIVBCRLFZLXISHEET1CELLSI8,14CZLYIVBCRLFZLYISHEET1CELLSI8,15GZLXISHEET1CELLSI8,16GZLYISHEET1CELLSI8,17ZBZXISHEET1CELLSI8,18ZBZYIA54A55A56A5722NEXTIFBHCCZLXH2CZLYH205SHEET1CELLSN17,1“闭G2524差为”SHEET1CELLSN17,2FORMATFBHC,“000”SHEET1CELLSN18,1“K”SHEET1CELLSN18,2FBHC/JLHSHEET1CELLSN11,13ZLXHSHEET1CELLSN11,14ZLYHSHEET1CELLSN11,15GXHSHEET1CELLSN11,16GYHENDIFENDSUB通G17819G1209G990G1207G11733完成G1114G4557G3364G7643的最终计算进G17819调G16809G2530程序G17828行正G5132G452A54A55A56A5723第4章程序的应用41附合导线计算程序的使用411程序使用说明（1）计算G5062G11705G9869的G3364G7643G7053G1313G16294打G5332工作薄3G3926图41图41G5062G11705G9869G7053G1313G16294计算G15932G3324附G2524导线G7053G1313G16294计算G15932G1025输入G5062G11705G9869的G3364G7643（G21656G14406G14406G2318G3507）G452（2）输入加密G9869G1022数G3324附G2524导线的G1025，首先要输入G7422G11705G9869的G1022数G452打G5332EXCEL计算程序，G3324数据输入G1025输入G7422G11705G9869的G1022数（G3926图42）图43加密G9869G1022数输入G6365钮G2345G1999“请输入加密G9869G1022数”G6365钮，弹出G1209G991G4557话框（G3926图44）图44加密G9869G1022数输入G4557话框输入G7422G11705G9869的G1022数G1209G2530，程序会G14270G2172生成G980G1022相G5224的EXCEL计算G15932格（G3926图A58A59A60A612445）图45G14270G2172生成的EXCEL计算G15932格（3）输入观测角G4570观测的G16294G5242值G1209G5242、分、秒的格式输入G2052（G3926图45）的“观测G16294”G6164G3324列的G15406线部分G452（4）输入导线长G5242G4570观测得G2052的导线的长G5242输入（G3926图45）“距离/M”G6164G3324列的G15406线部分G452（5）输入导线AB和导线CD的G7053G1313G16294G4570G5062G11705G3364G7643G7053G1313G16294输入G2052（G3926图45）红G14406G17805框里G45242程序的验证421输入已知条件G5062G11705G7588G8585附G2524导线G3926图（11）G6164G12046G4570G5062G11705的A、B、C、D四G9869的G3364G7643和6G1022观测G16294G1209G24625G1022距离输入程序G452422计算成果输入完毕G1209G2530G2345G1999“计算”G6365钮G13479