VB与Excel在水文频率计算中的应用

合集下载

用Excel—VBA编制水文频率适线程序

用Excel—VBA编制水文频率适线程序
En dW o . h r. L g n b x C a t s e e d=F le Ha as
这样即可通过公 式直接计算任 意 C 、 的 值 , sP值 而
不必通过查 值表再 内插的方法 , 大大提高了计算精度 。
3 绘制频 率 曲线
通常绘制频率曲线 图用 的是海森几 率格 纸 , 即正态概 率格纸 , 以横座标代表 概率 , 坐标 代表变数 。由于 x轴 纵 上 的刻度为对数刻度 , E cl 而 xe 缺省 的图表 不具 备以上功
准伽玛 函数计算( ) 。 7式 () 7 式中 : t Bx 一 P (p =J
() 3
由 = 4

J= 2 B

a 庐
( 代 (式 1 C )入8 得 一v 2 )
(() 4
卡 t
l p 一 +
n 3s 一 )
式 中 : 实测 系列项数 , ; n为 x 为实测值 , 为均值 , v c
文频率适 线程序 实现 了多组数 据连 续计算 、 自动化适线、 图象保存、 成果打印等功能。
【 关键词 】B 水文频率 程 序 P Ⅲ型 曲线 VA 一
自 20 1 2年开始 , 国开展 了第二次水资源规划 , 3 全 在工 作 中要进行大量的水文频率适线计算 ,以淮河流域为例 , 总共需完成 2 2 9 个频率适线计算 ,再加上数据 的修改 、 频 率计算要重新适线 , 因此工作量很大。 目前普遍使用的水 文频率适线程序大多是用 V B编写 的, 值多通过查表而
能, 必须要进行一些转换 。
31 座标 ( ) 实现 .横 的
4 优化 适线
优化适 线是配 出的频率 曲线 与实测经验频率点在纵 坐 标 之间 的差值按一定的法则 ( 目标函数 ) 使之最小。

利用Excel中VBA程序处理水文数据探讨

利用Excel中VBA程序处理水文数据探讨

首先按进舍规 则编制 “ 四舍六入 , 奇进偶 舍” 自定义 函
径 流 量 取 4位 有 效 数 字 , 小 数 不过 4位 ; 流量取 3 位 有 数 , 然后对计算结果 用特殊符号补 齐不 显示… 0 ’ 的空位 。 用 效数 字 , 小数不过 3 位; 流 速 大干 等 于 l m/ s 时, 取3 位 特殊符号补 齐位数 , 是指计算结果 中对于有小数位但 以若 有效数字 , 小于 l m/ s 时, 取2 位 有效数 字 , 小 数不过 3 位。 干个 … 0 ’ 结尾 的数 据 , 在E x c e l 中不显示 “ 0 ” 只有空位 , 并 且 还特 别规 定 了 “ 四 舍六 入 、 奇进偶舍” 的取 舍 原则 , 因此需 要 将 空 位补 齐 。 按照S L 2 4 7 —1 9 9 9 , 对 任 一 个数 又 叫“ 四舍 六入 五成 双 ” , 即被修 约的 数字 小于 “ 5 ” 时, 该 值 的处理都 有 2 个约束参数 , 最多保 留小数位数和有效 数 字 舍去 ; 被 修 约 的数 字大 于 “ 5 ” 时, 则进 位 ; 被修 约 的 数字 位数 。 在 尾数 的取舍上 遵从进舍 规则 , 即“ 四舍六入 , 数 字等 于 “ 5 ” 时, 要看 “ 5 ” 前面 的数 字 , 若是 奇数 则 进位 , 奇进偶舍” 。
或宏命令来 解决水 文资料 中流速 、 流量 、 径流量 等的“ 四舍六入” 问题 上做 了初步分析, 成功 自 定 义 了2 个 函数命令和 1 个 宏命 令 , 可
以直接应用 到水 文观 测数据处理 中, 并参 与后 续计 算分析 。 自定义函数 的使用方法 与E x c e l 内置 函数相 同, 宏命令 的循行语句则一
S L 2 4 7 —1 9 9 9 规定, 水 文数 据 的 有效 位数 处 理 方式 按特 定顺序执行计算 的方法 。 其 自定义 函数 完全可以实现

Visual B的计算中Excel编程在水文流量“四舍六入”的应用

Visual B的计算中Excel编程在水文流量“四舍六入”的应用

[ 献标识码] B 文
为奇 要进 一 。 就是 说 ,如 果 省 略 的尾 数 最 高 位 ”
1 概 述
在 水 文流 量计 算 中 ,为 提高 资料 精 度 , 《 水
是 4或小 于 4 ,就将 尾数 都 舍去 ,如果 省 略 的尾
数 最高 位是 6或 大 于 6 ,去掉 尾 数后 ,要 向它 的
六 入 ,逢 五奇 进 偶 舍 ” ,按 此 可 分 三步 来 组 织 数
据 结构 。
进一 ,五后 皆零 看奇 偶 ,五前 为偶 应 舍去 ,五前
第 一 步 :分析 m 和 n的 关 系 可 以发 现 每 个
[ 稿 日期 ] 2 0 - 0 — 2 收 08 1 8 [ 者 简 介 ] 田士 奇 (9 3 ) 男 ,毕 业 于吉 林 大学 计 算 机 系 ,工 程 师 t现 从 事 水情 预 报 工作 。 作 17 -
前 一位 进一 ;如 果要 省略 的尾 数最 高 位是 5 ,那 就要 根 据具 体情 况 而定 。如果 5 不 都 是 0 后 ,将 尾 数略 去后 要 向它 的前一 位进 一 ;如果 5后 面都
是 0 ,就要 看 它 的前 一 位 是 单数 还 是 双 数 ,5的
文 资料 整 编规 范 》[ ]对 大部 分 数字 提 出 了 “ 1 四
样 对 四舍 六入 的处 理也 增 加 了难 度 。但 用 VB编
都 没 有提 供 这样 的 函数 体 ,但 都 给开发 人 员提 供 了 自定 义 函数 的空 间 ,笔者通 过 实践 摸索 ,利 用
Vi a B程 序 自定 义 了一 个 函数 过 程 ,通 过 E — s l u x
制 的程序 中 ,将 上面变 量 设为 双精度 ,这样 正确 率几 乎 是 百 分 之 百 ,可 视 为 四舍 六 入 问题 的 解

基于Excel VBA水文频率计算程序的开发应用

基于Excel VBA水文频率计算程序的开发应用

, …) 式 中 : 为离均 系数 。 1 )
2 程 序 运 行
孚A AV 一 )21 G MN p ,一 ( M ( , 2 )
( )打 开 E cl选 择 “ 具 ” 拉 菜 单 “ 载 1 xe, 工 下 加
式 中 : 为离 均系数 ; A G MMAN I V为伽 玛 累 积分 布
“ 文” 水 下拉 菜单 项 ( 图 1 , F 菜 单 项 巾选 择 见 )在 拉
f x = 1 ep - () x [
式 中 : 均值 ; 为标准 差 。 为

] (3 1)
“ 文频 率分 析 ” 水 子项 目“ 文频 率 适 线 分 析 ” 水 即可 运 行本 程序 ; ( )在 “ 3 水文 ” 下拉 菜单 项 中 , 择 “ 除菜 求解 。
西 北水 电 ・ 0 1年 ・ 5期 21 第

细、 形状 、 色 ; 颜 图释 : 图名 、 数取 值 、 计 成果 ) 参 设 ;
(0 设 计 成 果 ( 始 数 据 、 验 频 率 、 计 成 1) 原 经 设
果、 频率 曲线 图) E cl 以 xe 表格 输 出或 直接 打印 。
E cl 件 为平 台开 发 ¨ , 中 E c l 件 具 有 良 xe软 J其 xe 软 好 的数 据存 储 、 计算 和绘 图功能 , 在水 利工 程设 计计 算 中应用 比较 广泛 。
fx ( )=

)-ep 一/( a1x [ 3
>0

) 1 ]( )
() 2 () 3

7 06 ) 105
要: 基于 E cl B xe V A二次开发功 能, 进行 5 种频率线型水文频率计算程序开发 ; 根据水文频率计算方法 , 采用 V A B

Excel VBA在水文数据处理中的基本应用

Excel VBA在水文数据处理中的基本应用

Excel VBA在水文数据处理中的基本应用
万涛;胡江;宋小燕;蒲政平
【期刊名称】《中国水运(下半月)》
【年(卷),期】2015(015)008
【摘要】水文基本工作的测、报、整、算是与大量的数据资料打交道的过程,Excel 为我们处理少量的数据提供了便捷,但当处理大量的数据及面对较复杂的情况,仅用Excel解决便显得有所局限.若通过Excel内部自带的套装编程软件进行VBA编程或编写自定义函数过程,就可将大量数据的处理工作批量化、简单化,文中结合水文工作中数据处理的具体实际,运用VBA编程,较以往单纯的用Excel处理数据,大大提高了数据处理的效率和质量.
【总页数】3页(P109-110,193)
【作者】万涛;胡江;宋小燕;蒲政平
【作者单位】长江水文上游局攀枝花分局,四川攀枝花617000;长江水文上游局攀枝花分局,四川攀枝花617000;长江水文上游局攀枝花分局,四川攀枝花617000;长江水文上游局攀枝花分局,四川攀枝花617000
【正文语种】中文
【中图分类】P333
【相关文献】
1.EXCEL VBA及函数在房屋检测数据处理中的应用 [J], 刘开祥;钱震生
2.Excel VBA在比重瓶法测量岩石比重数据处理中的应用 [J], 彭强;何鹏;潘荟霖;李
鹏成
3.VBA在Excel水文数据处理中的应用研究 [J], 杨东远;牛桂芝
4.VBA及Excel在微波器件测试数据处理中的应用 [J], 刘莉;徐可凡;彭清贵
5.VBA及Excel在微波器件测试数据处理中的应用 [J], 刘莉;徐可凡;彭清贵
因版权原因,仅展示原文概要,查看原文内容请购买。

谈如何巧用Excel提高水文水利分析计算效率

谈如何巧用Excel提高水文水利分析计算效率

谈如何巧用Excel提高水文水利分析计算效率摘要:在水文水利计算中,数据处理的工作量往往很多,传统的数据人工处理方法效率慢,而且容易出现计算错误。

excel作为一种常用的办公软件,有强大的数据运算、分析和统计能力,将excel引入到水文水利计算中能有效提高水利水文计算效率,提高计算准确性。

本文通过excel中的公式、函数与vba编程等功能,对如何巧用excel来提高水文水利计算效率这一课题进行分析。

关键词:excel 水文水利分析计算效率一、前言在水文水利工作中,一个非常重要的部分就是处理水文水利的相关数据,将数据进行分析、统计和整合、分类是水文水利工作中的重要部分。

由于数据分析和整理工作较为繁琐,而且富有变化性,因此,建立一个可以同时处理所有相关数据的程序是不现实的,而若是每一个工作都单独编写程序又会浪费太多时间,降低工作的效率,提高工作的复杂性。

因此,就需要一个易于操作又功能强大的软件对水文水利的相关数据进行处理,excel就能够很好地满足水文水利日常数据处理的要求。

将excel软件与水利工作结合在一起,不仅是水利工作数字化、信息化建设的要求,也是科技发展的必然趋势。

如今,excel软件已经成为水文水利中重要的日常工作软件,通过科学、合理地使用excel可以提高工作效率和计算结果的准确度,工作人员通过掌握excel中的公式运用和vba编程,能够快速而又针对性的解决绝大部分水文水利数据分析计算问题。

二、excel的相关数据处理在水文水利工作中,经常要处理大量原始数据,这也是水文水利数据分析计算工作的前期必要准备工作。

通过excel软件,能够实现这些数据的分类筛选、排列组合等基本操作处理。

在这些基础操作的帮助下,工作人员能够迅速查找到需要的数据资料进行下一步的分析整合。

除了基本的数据筛选、排序和分列功能,excel还可以帮助工作人员对缺失的数据进行补充或插补。

在水文水利工作中,常常需要准备长期的水文数据作基础,这其中的时间跨度可能会达到数十年。

EXCEL自定义函数在水文数据处理中的应用

EXCEL自定义函数在水文数据处理中的应用

EXCEL自定义函数在水文数据处理中的应用摘要:在水文工作中,几乎所有的数据都要按照《数值修约规则与极限数值的表示与判定》(GB/T8170-2008)的规定进行“进舍规则”的修约。

光靠人工处理,不仅浪费人力,而且还降低了工作效率。

本文利用Microsoft Office办公软件绑定的VBA(Visual Basic For Application)语言自定义函数,轻松实现“进舍规则”的修约。

关键词:“进舍规则” 水文数据浮标法VBAMicrosoft Excel办公软件具有很强大的数值运算处理能力,但现有的内置函数并不能满足水文工作中所需要的“进舍规则”修约。

如果仅靠人工的计算,则会浪费人力、降低效率;若利用Excel中绑定的VBA(Visual Basic For Application)语言自定义函数就可以轻松实现“进舍规则”的修约。

下面以Excel计算浮标法测流为例,用VBA来解决“进舍规则”的问题。

一、“进舍规则”的修约形式根据《数值修约规则与极限数值的表示与判定》(GB/T8170-2008)规定,水文资料使用“进舍规则”的修约形式:[1]1、拟舍弃数字的最左一位数字小于5,则舍去,保留其余各位数字不变。

2、拟舍弃数字的最左一位数字大于5,则进一,即保留数字的末位数字加1。

3、拟舍弃数字的最左一位数字是5,且其后有非0数字时进一,即保留数字的末位数字加1。

4、拟舍弃数字的最左一位数字是5,且其后无数字或皆为0时,若所保留的末位数字为奇数(1,3,5,7,9)则进一,即保留数字的末位数字加1;若保留的末位数字为偶数(0,2,4,6,8)则舍去。

5、负数修约时,先将它的绝对值按照上述1~4规定进行修约,然后在所得值前面加上负号。

(以下程序并没有涉及到负数)二、VBA程序及注解该程序是以Excel程序内置函数为基础来完成的。

定义符合“进舍规则”的函数名为round1(目前能用于浮标法测流量的部分虚流量计算,若要用于其他计算则需修改取值范围),该函数定义a,b,c,d,e,f为整数,并分别赋予为操作数字x的整数、十分位、百分位、千分位、万分位、十万分位及百万分位部分。

excel在水文工作中的运用

excel在水文工作中的运用

excel在水文工作中的运用随着计算机技术的不断发展,Excel已经成为了水文工作中不可或缺的工具之一。

Excel作为一种电子表格软件,具有数据处理、数据分析、数据可视化等多种功能,可以快速、准确地处理大量的水文数据,提高水文工作的效率和精度。

本文将介绍Excel在水文工作中的运用,并针对水文数据处理、水文数据分析、水文数据可视化等方面进行详细的讲解。

一、水文数据处理水文数据处理是水文工作中最为基础的工作之一,包括数据的输入、处理、存储等多个环节。

Excel作为一种电子表格软件,具有方便快捷的数据输入功能,可以通过手动输入、复制粘贴、导入文件等多种方式将水文数据导入到Excel中。

同时,Excel还可以对数据进行简单的处理,如数据的排序、筛选、去重等,方便用户对数据进行整理和管理。

在水文工作中,常常需要对水位、流量、降雨等数据进行计算,Excel具有强大的计算能力,可以通过公式的方式对数据进行计算。

例如,对于一个水位观测站的数据,需要计算出其平均值、标准差、变异系数等指标,可以使用Excel中的平均值函数、标准差函数、变异系数函数等进行计算。

此外,Excel还可以进行数据的透视表分析,方便用户对数据进行深入的分析和研究。

二、水文数据分析水文数据分析是水文工作中的重要环节之一,包括数据的统计分析、趋势分析、频率分析等。

Excel作为一种电子表格软件,具有丰富的数据分析功能,可以对水文数据进行多维度的分析和研究。

1. 数据的统计分析Excel可以对水文数据进行各种统计分析,如平均值、标准差、偏度、峰度等指标的计算。

同时,Excel还可以绘制直方图、箱线图、散点图等图表,直观地展示数据的分布情况和异常值情况。

此外,Excel还可以进行正态性检验、偏态性检验、峰度检验等统计分析,帮助用户对数据的分布情况进行判断和分析。

2. 数据的趋势分析Excel可以对水文数据进行趋势分析,如线性回归、多项式回归等。

通过趋势分析,可以了解数据的发展趋势和规律,为水文预测和水资源管理提供科学依据。

Excel及其VBA在水文统计参数优选中的应用

Excel及其VBA在水文统计参数优选中的应用

Excel及其VBA在水文统计参数优选中的应用
马细霞;王丰;马巧花
【期刊名称】《郑州大学学报(工学版)》
【年(卷),期】2003(024)002
【摘要】水文统计参数优选方法中,最优化方法要求使用者具备一定的系统工程基础和编程技巧,而图解适线法计算工作量大,计算结果因人而异.在分析以上两类方法的基础上,针对以上问题,基于Excel的内置函数、表格及图形处理功能,运用Excel 的VBA编写了简单的优选程序,实现了参数优选的简单化和图形输出的规范化.实例分析结果证明了该方法的可行性.
【总页数】3页(P67-69)
【作者】马细霞;王丰;马巧花
【作者单位】郑州大学环境与水利学院,河南,郑州,450002;郑州大学环境与水利学院,河南,郑州,450002;河南宇疆边贸科技应用总公司,河南,郑州,450003
【正文语种】中文
【中图分类】TV122
【相关文献】
1.浅谈Excel及Excel VBA在水文测验方式方法创新中的几点应用 [J], 徐利永;孟新华;李勇;徐新雪;付永惠
2.基于Excel VBA水文频率计算程序的开发应用 [J], 袁超
3.VBA在Excel水文数据处理中的应用研究 [J], 杨东远;牛桂芝
4.Excel VBA在水文数据处理中的基本应用 [J], 万涛;胡江;宋小燕;蒲政平
5.Excel VBA和Python语言在森林生态气象和水文工作中的应用与比较 [J], 李淳
因版权原因,仅展示原文概要,查看原文内容请购买。

水文频率分析计算软件的研制和应用

水文频率分析计算软件的研制和应用

水文频率分析计算软件的研制和应用(江苏省水文水资源勘测局无锡分局盛龙寿)水文频率计算用于确定设计洪水值或设计暴雨量、设计水资源量等,对于确保水利工程的安全,提高防汛抗旱决策指挥的科学性,提高水资源保护和管理的科学性具有重要作用。

目前,我省水利系统进行频率计算已经使用计算机,但与之配套的计算软件仍有许多缺陷,主要为:原始数据文件的加工复杂困难而容易出错、计算过程步骤多,输出图表没有站名、计算项目等内容,在运用时还需人工处理等。

为此,开发研制一个简单实用的水文频率计算软件是十分必要的。

一、软件组成本软件由主程序、参数配置文件、原始数据文件三部分组成,主程序Npl.exe运用Vb6.0编制。

参数文件为Excel文件,以“*.csv”为后缀。

参数文件Plgz.csv,用于确定频率格纸输出格式;参数文件Cspo.csv设置Γ分布离均系数Φ值表。

原始数据文件为文本文件,以站码命名,以“*.txt”为文件名后缀,内容为站名、项目名称、数据单位和资料系列。

二、主程序各模块的功能主程序由选择初始化站点、适线、保存成果、打印图形和退出五模块组成。

1、选择初始化站点模块。

用于选择需要计算的站点,计算出各种统计参数,并在计算机绘出偏差系数/离差系数(Cs/Cv)为2.0时的频率曲线(虚线)。

2、适线模块。

当频率曲线偏离点群中心时,适当调整Cs/Cv比值,即调整曲线的曲度,以达到最好效果。

3、保存成果模块。

保存经目估适线后重新计算出的各种成果,主要内容有统计次数、最大值、最小值、平均值、Cv值、Cs值、最大重现期及各种频率设计值,成果文件为Excel文件,以站名(站码)+.csv命名,如“无锡市(10000).csv”、“宜兴(10300).csv”等。

下面是无锡地区1956~2000年资料系列面雨量的频率计算成果表。

4、打印图形模块。

在打印机上直接打印出频率曲线图,仍以无锡地区1956~2000年资料系列面雨量的频率计算为例,效果如下图。

用EXCEL与VBA编程解决兰溪水文站水位比例法推流的计算问题

用EXCEL与VBA编程解决兰溪水文站水位比例法推流的计算问题

用EXCEL与VBA编程解决兰溪水文站水位比例法推流的计
算问题
贵天虎;方益铭
【期刊名称】《珠江水运》
【年(卷),期】2014(000)010
【摘要】水文测验中流量数据推流整编的方法有很多,兰溪水文站使用水位比例法推算低水流量,浙江省使用的南方片水文资料整编软件中,却没有提供这种方法,为了适应通用软件,兰溪水文站编写了辅助计算程序,利用EXCEL工具和VBA语言编写的水位比例法辅助计算程序正是这样的背景产生的,本文介绍了水位比例法及其辅助计算程序的发展情况、各时期辅助计算程序的弊端,提出了用EXCEL与VBA工具编程解决问题的思路和办法.
【总页数】2页(P32-33)
【作者】贵天虎;方益铭
【作者单位】浙江省水文局;浙江省水文局
【正文语种】中文
【相关文献】
1.谷城水文站水位流量关系综合线推流分析
2.切割水位法在赤坎水文站推流定线的应用
3.兰溪站水位比例法推流-水流沙电算整编方案
4.襄阳水文站上游站水位法推流分析
5.切割水位法在水文站开江期定线推流中应用
因版权原因,仅展示原文概要,查看原文内容请购买。

Visual Basic和Excel在水文资料统计中的应用

Visual Basic和Excel在水文资料统计中的应用

数据统计程序就 可 以大大 降低人 为 出错 率 , 提高 工作 效 率。 笔者 以水文站实测流量 资料统计 最大 13 7 1 、0日洪量为 、 、 、5 3
例 , 明 Vsa B s 说 i l ai E cl u c和 xe 在水文资料统计 中的应用 。
-、 …
^ . 一- … -
由水 文测站实测资料经过资料 整编后 的数据 资料 , 由地 方水 文局 录人数据库进行管理 。由于工程项 且规 划设计 需要 , 到
水文局抄 取水文资料 。
镕 搿赫肇 I : : } 瞒 == : 一
I・ }
:: : :
E 葛0
: P 1

r 《 日目 蕊
A )¥2 3 0/ 0 0 ” 然 后 向下 拖 动单元 格 右 下 角 十字 8 4 6 0 10 0 ,
标, 即得到连续 7 日洪 量 系列 , 在此 系列 中选 出最 大值 就是
数据在一列 内, 便于之后 的统计计算 和数据抽样 检查 。 部分程序代码如下 :
n() = xsetcl ( fi l e.e s i+ 1 2 . a e h l , ) V u l
St l et= xbo. rset ” e x he s lok Wokhe ( 日平均流 量” s ) 将 E cl xe 工作表 中 日平均流量数据统计后输 出在 同一个 工作表 中流 量数 据 右侧 , 一列 为 年份 , 另一 列 为逐 日流量 。
其 中二月平年为2 , 8d 闰年为2 , 9d 要单独统计 。统 计出来 的
3 用 V sa B s 编 程统计 流量 资料 i l ai u c
通过 Vsa Bs i l ai u c程序调 用 E cl xe 中“日平均 流量 ” 工作 表, 部分程序代码如下 :

用excelvba自定义函数解决水文资料中的问题

用excelvba自定义函数解决水文资料中的问题

利用EXCEL自定义函数功能实现水文数据的“四舍六入”云南水文水资源局大理分局解开创在水文工作中,我们需要用EXCEL来处理大量的水文数据,需要处理的水文数据通常要进行“四舍六入”,而EXCEL的内置函数又没有这方面的功能,这给我们水文工作带来了极大的不便。

不过,我们可以通过EXCEL VBA编程来实现自定义函数,也就是我们自己编一个具有“四舍六入”功能的函数来解决这一问题。

下面我们将详细介绍如何实现这一功能及其的应用。

一、什么是“四舍六入”按照相应水文规范的要求,水文及水质资料使用的“四舍六入五单双”,执行《数值修约规范》(GB8170-87)。

1.拟舍弃数字的最左一位数字小于5时,则舍去,即保留的各位数字不变。

2.拟舍弃数字的最左一位数字大于或等于5时,而其后跟有并非全部为0的数字时,则进1,即保留的末位数字加1。

3. 拟舍弃数字的最左一位数字为5,而后面无数字或皆为0时,若所保留的末位数字为奇数(1,3,5,7,9)则进一,为偶数(2,4,6,8)则舍弃。

0视为偶数。

二、代码的实现下面是我们自定义“四舍六入”函数的完整代码,“ ' ”后的汉字内容为代码注释内容。

此程序是在“取绝对值(Abs)”、“取整(Int)”、“四舍五入(Round)”等系统内置函数的基础上完成的。

函数的型式及其每个参数需要用户在属性设置中定义和声明,故叫做自定义函数。

此定义“四舍六入五单双”的函数名为Round5。

'“四舍六入”自定义函数' 函数形式 Round5(x,mm),返回值Round5为 Double 型' X为操作数值,mm为保留小数位数' mm为 Integer 型,mm = 0 表示取整数' 此算法是通过对要处理的数值进行倍数扩大,来获得需要比较数来实现“四舍六入”Private Function round5(X As Double, mm As Integer) As DoubleDim Temp1, Temp2 As StringTemp1 = 1If mm < 0 ThenTemp1 = 10 ^ Abs(mm)X = X / Temp1mm = 0End IfIf ((Int((Abs(X) - Int(Abs(X))) * 10 ^ mm) Mod 2) = 0 And (Abs(X) * 10 ^ mm - Int(Abs(X) * 10 ^ mm)) <= 0.5) And X <> Val(Round(Abs(X), mm) * Sgn(X)) Thenround5 = Val((Round(Abs(X) - 10 ^ (-mm) / 5, mm)))Elseround5 = Val(Round(Abs(X), mm))End Ifround5 = Val( round5 * Sgn(X) * Temp1)End Function三、具体的应用下面以EXCEL 2007为例,介绍该自定义函数的使用。

vba调洪演算中的应用

vba调洪演算中的应用

vba调洪演算中的应用一、介绍VBA是Visual Basic for Applications的缩写,是微软公司开发的一种宏语言,可以用于自动化操作Office等软件。

在水文水资源领域,VBA也有着广泛的应用。

本文将介绍在水文调洪中使用VBA进行演算的方法和步骤,并结合实例进行详细说明。

二、调洪演算原理调洪是指通过各种工程措施来调节河流水位和流量,以达到保护人民生命财产安全、保障农业生产和城市供水等目的。

在调洪过程中,需要进行各种演算计算,以确定最佳方案。

常见的调洪演算包括:设计洪水位、设计洪峰流量、泄洪能力分析等。

三、VBA在调洪演算中的应用1.自动计算通过编写VBA程序,可以实现自动计算各项参数。

例如,在计算设计洪峰流量时,可以编写一个程序来自动读取输入数据,并按照公式进行计算。

这样可以大大提高计算效率和减少误差。

2.数据处理在进行调洪演算时,需要对大量数据进行处理。

通过编写VBA程序,可以实现数据的批量处理和格式转换。

例如,在进行泄洪能力分析时,需要将多个数据文件进行合并,并按照一定格式输出结果。

通过编写VBA程序,可以实现自动合并和格式转换,减少手工操作。

3.可视化展示通过编写VBA程序,可以将计算结果以图表的形式展示出来。

例如,在进行设计洪水位计算时,可以将计算结果绘制成曲线图,直观地反映不同方案下的洪水位变化情况。

这样可以帮助决策者更好地理解和比较各种方案。

四、实例演示以下是一个简单的实例演示,在Excel中使用VBA进行设计洪水位计算。

1.准备数据首先需要准备输入数据:河道断面信息、雨量历时曲线、径流系数等。

2.编写VBA程序在Excel中按下Alt+F11键打开Visual Basic编辑器,在模块中编写以下代码:Sub Calculate()'读取输入数据Dim Q() As DoubleDim H() As DoubleDim T() As DoubleQ = Range("B2:B11")H = Range("C2:C11")T = Range("D2:D11")'计算设计洪水位Dim i As IntegerDim n As Integern = UBound(Q)For i = 1 To n Step 1If Q(i) > 0 ThenH(i) = H(i) + Q(i) / T(i)End IfNext i'输出结果Range("F2:F11") = HEnd Sub该程序读取输入数据,按照公式计算设计洪水位,并将结果输出到指定单元格。

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

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

Excel在水文要素计算中的应用论文Excel在水文要素计算中的应用论文摘要:Excel是办公自动化软件Office的重要组成部分之一,是Windows操作平台上的电子表格软件,具有强大的制作表格、处理数据、分析数据、创建图表等功能,在日常生活工作中得到了大量的应用。

目前陕西水文工作正向自动测报迈进,但仍有不少水文测验项目是人工测量,计算。

利用Excel来进行一些水文要素的计算,不但适应了现阶段工作要求,还提高了工作效果。

关键词:Excel流量泥沙计算电子表格Excel有很多版本,现在以使用最广的Excel2000在北洛河头水文站的使用,来谈谈它在水文要素计算中的应用。

1.Excel2000的运行软件运行环境:Windows98、WindowsMe、Windows2000、WindowsXP。

硬件环境:一般现在的计算机都能满足,只要能安装Windows98即可,没有特别要求。

除安装Excel2000外,还应安装VisualBasic6.0。

这样就可以创建自定义函数解决数据处理上的一些问题。

2.问题处理以前西安水文局就有人将Excel制作的电子表格用于水流沙计算。

目前为提高资料精度《水文资料整编规范》SL247-1999中规定水文数据采用“四舍六入,逢五奇进偶舍”的方法处理,同时还限制了相应的`有效数字位数。

这对于用电子表格计算水文资料提出了高的要求,最好的解决办法是利用VisualBasic编写的自定义函数和Excel内置函数来解决数据处理问题。

其中对“四舍六入”的处理自定义函数为:Functionjinghe(numAsDouble,DIGAsByte,OptionalTorVAsBoole an)AsVariantDimTemp1AsDoubleDimTFMAsStringDimTemp2AsStringDimTempoffAsDoubleIfnum=0ThenTemp1=0Temp2="0"GoToExitFnEndIfWithApplication.WorksheetFunctionIfnum<0.1ThenDIG=DIG-1EndIfTempoff=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)_Mod2)=0))*10^Int(.Log(Abs(num))-DIG+1)Temp1=.Round(Abs(num),-(Int(.Log(Abs(num)))-DIG+1))Temp1=Temp1-TempoffTrn=TrnAnd(10^Int(.Log(Temp1))=Temp1AndTemp1>Abs(num)) IfDIG>14AndTrnThenTemp2="有效位数不能太多"GoToExitFnEndIfIfDIG=1AndInt(.Log(Abs(Temp1)))=0AndNotTrnThenTFM=""ElseIfNot(DIG=1AndInt(Temp1)=Temp1AndNotTrn)ThenTFM=TFM&"." TFM=TFM&.Rept("0",DIG+Abs(Trn)-1)EndIfTFM="0"&TFMIfInt(.Log(Temp1))<0ThenTFM=TFM&.Rept("0",-Int(.Log(Temp1)))ElseIfInt(.Log(Temp1))>0ThenTFM=TFM&"E+"EndIfTemp1=Temp1*Sgn(num)Temp2=.Text(Temp1,TFM)EndWithExitFn:IfTorVThenjinghe=Temp2Elsejinghe=Temp1EndIfEndFunction自定义函数形式为:jinghe(数值,保留有效位数,返回文本或数值),其中根据头站特点对数值小于1时的情况已作了设定,在流量、泥沙数据计算过程中应用良好。

Excel软件在水文分析计算中的应用

Excel软件在水文分析计算中的应用

Excel软件在水文分析计算中的应用摘要:办公软件中的Excel 有着强大的数据处理能力, 在水文部门不仅计算上有很大的用途, 而且其数据库处理功能以及图表分析功能也给水文分析提供了很大的便利。

本文介绍了Excel在水文计算中的几个特殊应用,对一些日常工作效率的提高有很大帮助。

关键词:Excel 水文计算数据处理Abstract: Excel office software has powerful data processing capability, hydrological services not only the calculation of a great purpose, and its database processing functions, and chart analysis capabilities provide a great convenience to the hydrological analysis. This article describes the Excel in hydrological calculations for special applications, be of great help in daily work efficiency.Keywords: Excel, hydrological calculation, data processing.Excel 作为一个通用的计算机软件, 目前已在各行各业得到了广泛的应用。

统计计算、数据库处理以及图表分析是水文工作最重要的组成部分。

这些工作特别是图表分析存在着多变性以及人为操作介入性,不可能做成一个包罗万象的日常工作处理系统,若每项工作都分别编写程序代码,由于它的个例性,程序的生命周期太短。

利用Exce软件内部自带的函数处理一些简单的水文分析计算问题就会省时省力,提高工作效率。

一、分析计算1统计计算统计计算。

基于VB和Excel的水文频率计算软件的开发及应用

基于VB和Excel的水文频率计算软件的开发及应用

基于VB和Excel的水文频率计算软件的开发及应用
秦国民
【期刊名称】《西北水电》
【年(卷),期】2018(000)006
【摘要】介绍了基于VB和Excel的水文频率计算软件的开发和应用,在VB 6.0环境下开发的软件以插件形式与Excel办公软件无缝接合,解决了水文频率计算中的数据输入输出、统计参数计算及优选、成果图表输出等问题,在生产实践中取得了较好的效果.
【总页数】3页(P17-19)
【作者】秦国民
【作者单位】中国电建集团西北勘测设计研究院有限公司,西安710065
【正文语种】中文
【中图分类】P333.9
【相关文献】
1.基于EXCEL的水文频率计算软件开发 [J], 王双银;向友珍;朱晓群;黄燕荣
2.VB与Excel在水文频率计算中的应用 [J], 张堃一
3.基于Excel VBA水文频率计算程序的开发应用 [J], 袁超
4.基于Excel VBA的短路电流实用计算软件在太平湾电站的开发应用 [J], 苏有权
5.基于Excel VBA的短路电流实用计算软件在太平湾电站的开发应用 [J], 苏有权因版权原因,仅展示原文概要,查看原文内容请购买。

用Excel-VBA编制水文频率适线程序

用Excel-VBA编制水文频率适线程序

用Excel-VBA编制水文频率适线程序
汪跃军
【期刊名称】《治淮》
【年(卷),期】2006(000)008
【摘要】Excel不仅具有强大的计算功能,而且可以通过自身的套装软件Visual BASIC进行编程,用Excel-VBA编制的水文频率适线程序实现了多组数据连续计算、自动化适线、图象保存、成果打印等功能.
【总页数】2页(P22-23)
【作者】汪跃军
【作者单位】淮河水利委员会,蚌埠,233001
【正文语种】中文
【中图分类】TP3
【相关文献】
1.对水文频率分析中目估适线法的思考 [J], 朱佳君;张钰;何彬;段志华;李小兵
2.优化适线法在水文频率分析中的应用 [J], 周爱霞;张行南
3.粒子群优化适线法在水文频率分析中的应用 [J], 刘力;周建中;杨俊杰;李英海;张
勇传
4.基于Python的优化适线法在水文频率分析中的应用 [J], 雷庆文;高培强;李建林
5.基于Python的优化适线法在水文频率分析中的应用 [J], 雷庆文;高培强;李建林因版权原因,仅展示原文概要,查看原文内容请购买。

Visual Basic和Excel在水文资料统计中的应用

Visual Basic和Excel在水文资料统计中的应用

Visual Basic和Excel在水文资料统计中的应用
张永华;刘刚;刘国梁
【期刊名称】《黑龙江水利科技》
【年(卷),期】2011(000)006
【摘要】水文资料是一切与水相关联的国民经济建设的重要基础信息和决策依据。

水文资料数据量大,资料统计的工作量很大,如何提高数据统计的速率与准确率,成为工程规划设计的问题之一。

文章介绍了怎样利用Excel中的计算功能结合VisualBasic语言编制程序进行实测流量资料统计,说明Visual Basic和Excel在水文资料统计中的应用。

【总页数】2页(P81-82)
【作者】张永华;刘刚;刘国梁
【作者单位】黑龙江省水利水电勘测设计研究院,哈尔滨150080;黑龙江省水利水
电勘测设计研究院,哈尔滨150080;黑龙江省水利水电勘测设计研究院,哈尔滨150080
【正文语种】中文
【中图分类】TP39
【相关文献】
1.Excel Visual Basic应用程序语言在大鼠在体肠吸收实验中的应用 [J], 任君刚
2.Visual Basic及Excel在水文频率计算中的应用研究 [J], 王超;伍立群;郭有安
3.Microsoft Excel中Visual Basic编辑器在寻找最短路径中的应用 [J], 杜渐;李
俊杰;王永华;
4.Excel Visual Basic应用程序在医院医用耗材管理中的应用分析 [J], 朱俊;冯锦丽
5.Excel Visual Basic应用程序语言在生物等效性评价中的应用 [J], 邹梅娟;任君刚;程刚
因版权原因,仅展示原文概要,查看原文内容请购买。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
地址
V B调 用 E x c e l 设 计 编 程 方 法 的具 体 步 骤 如
下:
f 1 1 调 用前 须 先启 动 E x c e l 。 f 2 1 在E x c e l 中定义 需要 连 接 的单元 格 区域 , 定 义 的单 元 格 区域可 以是 文本 框 。
称单 峰 曲线 , 其 函数 为 :
f ( x ) =
在 工 程水 文 和水 资源 分 析 中 .经 常要 对 各 种 水 文 要 素之 间 的 函数关 系 进行 繁杂 的推 求 .这 其 中最具 代表性 的就是水 文 频率计 算l l I 传 统 的水 文 频率 计算 多是 采用 目估 拟合 方 法
[ 摘 要 ]本 文根 据 微 软 “ 所 见 即所 得 ” 的 软 件 开 发 理 念 ,将 V i s u a l B a s i c( V B ) 的视 窗 开发 特性 与 E x c e l 的 强 大 数 据 处理 功 能 相 结 合 ,提 出 了一 种 既 简便 又 经济 软 件 开 发 方 案 ,拓 展 了软 件 的 兼 容性 ,较 好 地 解 决 了水 文频 率 计 算 中的数 据 导 入 、 函数 拟 合 、 图表 编 辑 和输 出等 问题 。 [ 关 键 词 ]V B;E x c e l ; 水 文频 率 计 算 [ 中 图分 类 号 ]P 3 3 3 . 9 [ 文 献 标 识 码 ]A
( … 。

式中 : 厂 ) 为 的 伽 玛 函数 ; 为皮 尔 逊 三 型 频 率 曲线 的形状参 数 ; 为皮 尔逊 三 型频率 曲线 的 尺 寸参数 ; O l O 为皮尔 逊三 型频率 曲线 的位置 参数 ; x
为 随机变量 , 其 中参 数 。 ≤ ≤∞。
、 O t o 与统 计均
来完成 。 即先采 用 人工 计算 水 文频 率 , 目估绘 制 水 文频 率 曲线 . 然 后 再根 据经 验 推求 理 论频 率 曲线 。
在 这 些 过 程 中要 进 行 大 量 繁 琐 的 计 算 和查 表 工 作. 耗 时 费力 , 精确率 低 下 。现 在 , 随着科 学技术 的 发展 .广 大专 业人 员 在实 践 中编 制 了许 多 水文 频
取 值应 满足 如下等 式 :
≥ 一 O l o ) 一 e ’
在计算 水文 变量 x p时 . 使用 V B调 用 E x c e l 编 程 的优势 就 明显地 显示 出来 了 . 因为 V B的函数 功
能远 不如 E x c e 1 .在 E x c e l 中伽 玛 函数及 其 它 的反 函 是 其 固 有 的 .我 们 可 以 用 伽 玛 函 数 G A M— MA D I S T、伽 玛 函数 的反 函 G AMMA I N V计 算水 文
值参 数 、 变 差 系数 、 偏态 系数 c 0 有如下关 系 :

去; 寺
在 工程 水 文学 中 .一 般需 求 出 指定 频 率 P所
对 应 的随 机水 文 变量 p , 并且 随机 水 文变 量 x p的
率程 序 .极 大 地 提高 了水 文 频率 计算 的效 率 和精
第 1 2期 ( 总第 3 7 9期 )
[ 文章 编 号 ]1 0 0 9 — 2 8 4 6( 2 01 3 )1 2 — 0 0 5 0 - 0 3
吉 林
水 利
2 0 1 3年 l 2月
V B与 E x c e l 在水 文频率计算 中的应用
张望 一
( 吉林省蛟 河 市移 民工作 办公 室 ,吉林 蛟 河 1 3  ̄0 0 )
3 V B调 用 E x c e l 的 方 法
V B调 用 E x c e l 的方法 是利 用 D D E功能 . 实 现
括水 文 资料 系 列概 率 分布 规 律 .即水 文 资料 系列
概 率 分 布规 律 符合 一 条一 端 有 限一端 无 限 的不 对
[ 收 稿 日期 】2 0 1 3 — 1 0 — 2 0
变量 x p:



理 功能 相 结合 的方法 .研 究 了一种 既 简便 又 经 济
的软件 开发方 案[ 2 1
2 水 文 频 率 计 算 基 本 原 理
在水 文频 率 计算 中 .常 用 皮 尔逊 三 型 曲线 概
G A M M A I N V ( 1 - p , , 寺) + 0
度 然 而这 些 程 序多 数都 由于软 件 开发 平 台 的 限 制。 程 序兼 容性 不 好 . 成 果不 能 在其 他 应用 软件 中 交互 修 改 .输 出 的水 文频 率 曲线 图难 以达 到 理想 的 效果 , 推广 受 到 了一定 的限制 。为此 , 本 文 根据 微软 “ 所 见 即所 得 ” 的软 件 开 发 理 念 . 应用 V i s u a l B a s i c ( VB ) 的视 窗 开发 特性 与 E x c e l 的强 大数 据处
T e x t 5 . L i n k Mo d e = 2 连接 模式 为手 动
T e x t 5 . L i n k P o k e 将 V B文 本 框 中的 内容 传 送
给 E x c e l
f 4 1 在V B “ 编辑” 菜 单上 使 用 “ 粘 贴链 接 ” 命令 ,

5 0一
吉林 水利
V B与 E x c e l 在 水 文频 率计 算 中的应 用 E x c e l 的连接
张 垄一 2 0 1 3年 1 2月
方式 有设 计 编程 和代码 编 程两 种 。
3 . 1 设计 编程D I
T e x t 5 . T e x t = " 水 文频 率 计 算 ” 在V B 中输 人 传输 文本 T e x t 5 . L i n k I t e m= “ R 5 c 5 ” 设置 E x c e l 中的接 收
相关文档
最新文档