vb与excel在水文频率计算中的应用

《vb与excel在水文频率计算中的应用》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、第12期(总第379期)吉林水利2013年l2月[文章编号]1009—2846(2013)12—0050-03VB与Excel在水文频率计算中的应用张望一(吉林省蛟河市移民工作办公室，吉林蛟河13~00)[摘要]本文根据微软“所见即所得”的软件开发理念，将VisualBasic(VB)的视窗开发特性与Excel的强大数据处理功能相结合，提出了一种既简便又经济软件开发方案，拓展了软件的兼容性，较好地解决了水文频率计算中的数据导入、函数拟合、图表编辑和输出等问题。[关键词]VB；Excel；水文频率计算[中图分类号]P333．9[文献标识码]

2、A称单峰曲线，其函数为：f(x)=(⋯。e在工程水文和水资源分析中．经常要对各种式中：厂)为的伽玛函数；为皮尔逊三型水文要素之间的函数关系进行繁杂的推求．这其频率曲线的形状参数；为皮尔逊三型频率曲线的中最具代表性的就是水文频率计算llI尺寸参数；OlO为皮尔逊三型频率曲线的位置参数；x传统的水文频率计算多是采用目估拟合方法为随机变量，其中参数。≤≤∞。、Oto与统计均来完成。即先采用人工计算水文频率，目估绘制水值参数、变差系数、偏态系数c0有如下关系：文频率曲线．然后再根据经验推求理论频率曲线。；在这些过程中要进行大量繁琐的计算和查表工去

3、；寺作．耗时费力，精确率低下。现在，随着科学技术的在工程水文学中．一般需求出指定频率P所发展．广大专业人员在实践中编制了许多水文频对应的随机水文变量p，并且随机水文变量xp的率程序．极大地提高了水文频率计算的效率和精取值应满足如下等式：度然而这些程序多数都由于软件开发平台的限≥一Olo)一e’制。程序兼容性不好．成果不能在其他应用软件中交互修改．输出的水文频率曲线图难以达到理想在计算水文变量xp时．使用VB调用Excel编的效果，推广受到了一定的限制。为此，本文根据程的优势就明显地显示出来了．因为VB的函数功微软“所见即所得”的软件开发理

4、念．应用Visual能远不如Exce1．在Excel中伽玛函数及其它的反Basic(VB)的视窗开发特性与Excel的强大数据处函是其固有的．我们可以用伽玛函数GAM—理功能相结合的方法．研究了一种既简便又经济MADIST、伽玛函数的反函GAMMAINV计算水文的软件开发方案[21变量xp：x=2水文频率计算基本原理pGAMMAINV(1-p，，寺)+0在水文频率计算中．常用皮尔逊三型曲线概3VB调用Excel的方法括水文资料系列概率分布规律．即水文资料系列概率分布规律符合一条一端有限一端无限的不对VB调用Excel的方法是利用DDE功能

5、．实现[收稿日期】2013—10—20—50一吉林水利VB与Excel在水文频率计算中的应用张垄一2013年12月方式有设计编程和代码编程两种。Excel的连接3．1设计编程DIText5．Text="水文频率计算”在VB中输人VB调用Excel设计编程方法的具体步骤如传输文本下：Text5．LinkItem=“R5c5”设置Excel中的接收f11调用前须先启动Excel。地址f21在Excel中定义需要连接的单元格区域，定Text5．LinkMode=2连接模式为手动义的单元格区域可以是多个Text5．LinkPoke将VB文本框中的

6、内容传送f31在VB控件工具中选择一个文本框。给Excelf41在VB“编辑”菜单上使用“粘贴链接”命令，Text2．LinkMode=0连接模式为关闭在VB中建立一个与窗体一起保存的数据链接EndSUb完成以上4步后．VB已经自动地在这个文本框控件的属性中设置了LinkTopicL、Linkhem和inkMode属性，LinkTopic=“Excel2[Book2]Sheet2”；4VB水文频率计算软件的实现方法Linkhem=“R2C2：R8C8”；LinkMode=“1．Automat—ic"。VB水文频率计算由经验频率计算参数统计

7、、f5)我们再将这个文本框的MuhiLine属性设置交互适线和图表绘制三个模块构成为True。4．1经验频率及统计参数至此．如果改变在Excel中定义的连接单元格在水文频率计算中．经验频率及统计参数根区域内的数据．VB文本框中的内容就会自动地随据资料系列中是否包含调查值．分为连续系列和Excel改变．VB文本框中显示的内容完全与Excel非连续系列两种。连续系列不含历史调查值。全部中显示的内容相同为实测资料：非连续系列中既包含历史调查值也VB成功调用Exce1．使得我们可以在VB中轻包含实测连续资料。对于非连续系列。必须先确定松地使用Ex

8、cel的全部功能历史调查值重现期．再进行频率计算和函数曲线3．2代码编程拟合[41以下段代码可以使得VB的某个文本框自动4．1．1连续系列地从Excel的某个单元格区域内中接收数据。在连续系列