兴利调节计算的计算机自动化实现.pdfVIP

兴利调节计算的计算机自动化实现.pdf

  1. 1、本文档共3页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
兴利调节计算的计算机自动化实现.pdf

第3期 水 利 信 息 化 NO.3 2010年8月 舫 ferResourcesInformatization Aug.,2010 兴利调节计算的计算机 自动化实现 杨 淼,刘 埔,黄鑫磊,张 凯 (中国矿业大学资源与地球科学学院,江苏 徐州 221008) 摘 要:}XMicrosoftVisua1Basic6.0为平台,结合 Excel的强大报表功能,通过VB与Excel相互间数据 的交互,将 VB与Office结合,用户按照规定格式输入数据,利用开发的VB程序载入数据,计算得到待求参 数,实现了兴利调节计算过程中的自动化。 关键词:径流计算;兴利调节;Vistla1Basic6.0;计算机 自动化;Excel 中图分类号:TP3-05 文献标识码:B 文章编号:1674—9405(2010)03—0055—03 0 前言 按照规定格式输入数据 ,兴利调节计算输入格式如 图 1所示,阴影部分为实测资料或历史数据 ,空白 河川径流的剧烈变化,给人类带来很多不利 , 处即为所需的结果,利用 已经写好的VB程序载入数 如汛期大洪水容易造成灾害,而枯水期水少,不能 据计算,并将计算结果输出到计算机的任意位置。 满足兴利需要 。因此 ,无论是为了消除或减轻洪水 灾害,还是为了满足兴利需要,都要求采取措施对 天然径流进行控制和调节 。这种为了除水害,兴水 利,通过采取人工措施对天然径流进行 的调节,就 称为径流调节。 而利用水库,以兴利为 目的进行 的径流调节称为水库兴利调节。借助水库的调节作 用,通过兴利调节,按用水要求重新分配河流天然 径流,可 以协调来水与用水在时间分配和地区分布 上的矛盾,以及统一协调各用水部 门需求之间的矛 盾,对个人、集体用水,工业生产均有着重要的意 义。但是水利计算中的计算公式通常都 比较复杂, 在兴利调节计算中,往往需要进行大量的运算才能 图 1 兴利调节计算输入格式 得到所需的结论数据 ,如果单纯依靠书面计算 , 需要耗费大量人力物力,不符合现代水文工作的要 1 兴利调节计算 求。虽然使用Excel可以帮助我们完成一部分 自动计 算工作 ,但 Excel毕竟不是专业的计算软件,当计 兴利调节计算的基本原理是水库的水量平衡, 算量和公式复杂之后 ,编写起来十分容易出错 ,且 即将整个调节周期划分为若干个计算周期 (一般取 各 Excel表格之间的计算公式不具备可移植性,这就 月或旬),然后按时历顺序进行逐时段的水库水量 导致下次计算仍然会出现大量的重复性工作。 平衡计算。它是研 究天然来水、各部门的用水与水 鉴于上述情况,以MicrosoftVisualBasic6.0为 库库容 3者之间的关系。某一计算时段At内水库水 平台,结合 Excel的报表功能,通过VB与 Excel相 量平衡方程式为: 互间数据的交互,将VB与Office结合。用户只需 △V=△ —AVo (1) 收稿 日期:2OlO一04—08 作者简介:杨 淼 (1988--),男,江西泰和人,在读硕士研究生,主要研究方向:水文学与水资源。 56 水 利 信 息 化 2010,(3) 式中: △ 为At时段内水库的进水量;△ 为At 写Excel,首先要在VB工程中添加引用:Microsoft 时段内水库的出水量;AV为 △f时段内水库水量的 ExcelX.XObjectLibrary

文档评论(0)

18273502 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档