《【最新word论文】Excel在水文要素计算中的应用【水利工程专业论文】》由会员分享，可在线阅读，更多相关《【最新word论文】Excel在水文要素计算中的应用【水利工程专业论文】（3页珍藏版）》请在金锄头文库上搜索。
1、1Excel 在水文要素计算中的应用摘要：Excel 是办公自动化软件 Office的重要组成部分之一，是 Windows操作平台上的电子表格软件，具有强大的制作表格、处理数据、分析数据、创建图表等功能，在日常生活工作中得到了大量的应用。目前陕西水文工作正向自动测报迈进，但仍有不少水文测验项目是人工测量，计算。利用 Excel来进行一些水文要素的计算，不但适应了现阶段工作要求，还提高了工作效果。 关键词：Excel 流量泥沙计算 电子表格 Excel有很多版本,现在以使用最广的 Excel2000在北洛河 头水文站的使用，来谈谈它在水文要素计算中的应用。 1.Excel2000的运行 软件运行
2、环境：Windows98、WindowsMe、Windows2000、WindowsXP。硬件环境：一般现在的计算机都能满足，只要能安装 Windows98即可，没有特别要求。除安装 Excel2000外，还应安装 VisualBasic6.0。这样就可以创建自定义函数解决数据处理上的一些问题。 2.问题处理 以前西安水文局就有人将 Excel制作的电子表格用于水流沙计算。目前为提高资料精度水文资料整编规范SL247-1999 中规定水文数据采用“四舍六入，逢五奇进偶舍”的方法处理，同时还限制了相应的有效数字位数。这对于用电子表格计算水文资料提出了高的要求，最好的解决办法是利用 VisualB
3、asic编写的自定义函数和 Excel内置函数来解决数据处理问题。其中对“四舍六入”的处理自定义函数为： Functionjinghe(numAsDouble,DIGAsByte,OptionalTorVAsBoolean)AsVariant DimTemp1AsDouble DimTFMAsString DimTemp2AsString DimTempoffAsDouble Ifnum=0Then Temp1=0 Temp2=0 GoToExitFn EndIf WithApplication.WorksheetFunction IfnumAbs(num) IfDIG14AndTrnThen
4、 Temp2=有效位数不能太多 GoToExitFn EndIf IfDIG=1AndInt(.Log(Abs(Temp1)=0AndNotTrnThen TFM= Else IfNot(DIG=1AndInt(Temp1)=Temp1AndNotTrn)ThenTFM=TFM&. TFM=TFM&.Rept(0,DIG+Abs(Trn)-1) EndIf TFM=0&TFM IfInt(.Log(Temp1)0Then TFM=TFM&E+# EndIf Temp1=Temp1*Sgn(num) Temp2=.Text(Temp1,TFM) EndWith ExitFn: IfTorVThe
5、n jinghe=Temp2 Else jinghe=Temp1 EndIf EndFunction 自定义函数形式为：jinghe(数值,保留有效位数,返回文本或数值)，其中根据 头站特点对数值小于 1时的情况已作了设定，在流量、泥沙数据计算过程中应用良好。3.流量、输沙率计算 用 Excel创建流量计算表（详见附表一“ 头（四）站测深、测速记载及流量计算表” ） ，其中在宏中加入以上自定义函数，在计算中符合四舍六入的要求，表下方的统计栏极值挑选采用 max函数在测得水深、测点流速中自动挑选。一般一个站的测流垂线基本固定，这样再次使用只需把起点距、测得水深、信号个数、历时输入表格中相应空格，
6、流量就会顷刻算出，完全符合规范要求。输沙率计算（见附表二）比流量计算简单，方法基本同流量计算。 4.关系曲线检验及标准差计算 按照水文资料整编规范SL247-1999 规定水位流量、单断沙关系曲线，关系点在 10各以上就必须进行三种检验和标准差计算。利用 Excel表格制作计算表(见附表三、四： 头(四)站 2005年单断沙关系曲线检验及标准差计算表，水位流量与此相同在此不再赘述)，其中点据数 n统计采用 COUNT(B5:B34)，正负号统计采用 COUNTIF(G5:G34,+)，计算过程采用了四舍六入自定义函数。再3次使用时只要输入断沙实测和查线点据，第二张的标准差、不确定度计算立马产生。 5.结语 在 头站 Excel还用于断面图绘制，报汛曲线绘制等方面。另外目前网上可以看到不少编制好的流量、标准差计算程序。但是我们的测站计算机刚开始普及，符合陕西水文计算要求，职工容易掌握，与手工计算表格、方法、流程相适应的却很少。以上利用 Excel电子表格计算的方法，由于直观符合手算要求，提高了工作效率，经在状头站试用大家普遍能接受。同时体会到一般职工，大可不必对计算机畏惧，即使不懂英语，只要认真学习，勤于动脑，同样能用一些应用软件来解决工作中的实际问题，这样才能从真正意义上使计算机在我们测报工作得到普遍应用。以上见解由于时间仓促、水平有限肯定有很多不足敬请指正。
