评价网 > 科教论文 > 工学毕业论文 > 土木工程论文 > 正文

Excel在水文要素计算中的应用

2013-09-09 01:04 摘要：Excel是办公自动化软件Office的重要组成部分之一，是Windows操作平台上的表格软件，具有强大的制作表格、处理数据、数据、创建图表等功能，在日常生活工作中得到了大量的。陕西水文工作正向自动测报迈进，但仍有不少水文测验项目是人工测量，。利用Excel来进行一些水文要素的计算，不但适应了现阶段工作要求，还提高了工作效果。 

关键词：Excel 流量 泥沙 计算 
电子表格Excel有很多版本,现在以使用最广的Excel 2000在北洛河?头水文站的使用，来谈谈它在水文要素计算中的应用。?
1. Excel2000的运行 ?
软件运行环境：Windows 98、Windows Me、Windows 2000、Windows XP。硬件环境：一般现在的计算机都能满足，只要能安装Windows 98即可，没有特别要求。除安装Excel 2000外，还应安装Visual Basic6.0。这样就可以创建自定义函数解决数据处理上的一些。
2. 问题处理 
　　以前西安水文局就有人将Excel制作的电子表格用于水流沙计算。目前为提高资料精度《水文资料整编规范》SL247-1999中规定水文数据采用“四舍六入，逢五奇进偶舍”的处理，同时还限制了相应的有效数字位数。这对于用电子表格计算水文资料提出了高的要求，最好的解决办法是利用Visual Basic编写的自定义函数和Excel内置函数来解决数据处理问题。其中对“四舍六入”的处理自定义函数为：
Function jinghe(num As Double, DIG As Byte, Optional TorV As Boolean) As Variant
Dim Temp1 As Double
Dim TFM As String
Dim Temp2 As String
Dim Tempoff As Double
If num = 0 n
Temp1 = 0
Temp2 = "0"
GoTo ExitFn
End If
With Application.WorksheetFunction
If num < 0.1 Then
DIG = DIG - 1
End If
Tempoff = Abs((--Right(num / 10 ^ (Int(.Log(Abs(num))) - DIG + 1), 2) = 0.5) _
* ((--Right(Int(Abs(num) / 10 ^ (Int(.Log(Abs(num))) - DIG + 1)), 1) _
Mod 2) = 0)) * 10 ^ Int(.Log(Abs(num)) - DIG + 1)