首页 › 地下水专版 › 地下水评价导则一维水质瞬时污染源预测程序（有界面）

明天你好 发表于 2012-4-9 10:41

地下水评价导则一维水质瞬时污染源预测程序（有界面）

本帖最后由 明天你好 于 2016-11-7 09:21 编辑

自己用visual basic2008编的，求解《环境影响评价技术导则 地下水环境》（HJ 610-2011）附录F中F.3.2.1.1节公式F.13的计算程序，有界面，操作简单。
程序已升级：

http://www.eiafans.com/thread-967022-1-1.html




因为有人问，所以再补充点资料：
   1   横截面积=含水层厚度*污染带宽度（我个人认为是这样的）
   2   水流速度=渗透系数*水力坡度/有效孔隙度
   3   有效孔隙度为岩石中互相连通的孔隙的体积与岩石总体积之比，跟含水层岩性有关，请查阅含水层岩性的相关资料。砾石：0.25-0.4，砂：0.25-0.5，粉砂：0.35-0.5，粘土0.40-0.70
   4   弥散系数请查阅地下水污染方面的资料，取值变化范围较大。弥散系数=弥散度*水流速度，根据室内实验弥散度=0.01-1cm之间，但在野外实际运用中，考虑弥散度的宏观尺度效应，需将该值放大2-6个数量级。

prefectj 发表于 2012-4-9 12:54

谢谢楼主，学习下

flypc 发表于 2012-4-9 13:27

学习一下！！！！！！！！

liyao629 发表于 2012-4-9 17:08

谢谢楼主提供，大家一同学习啊

buddyblue 发表于 2012-4-9 19:43

参数从哪来？

hy4321 发表于 2012-4-10 08:19

vb哦都还给老师了

西木 发表于 2012-4-10 08:30

看一下，VB都忘了

西木 发表于 2012-4-10 08:33

应用程序失败，打不开呀。

alang 发表于 2012-4-10 09:02

:)学习一下

q31307210 发表于 2012-4-10 09:03

这个是原创吗？ 支持下~

player_ghost 发表于 2012-4-10 09:03

学习学习了，谢谢分享

diaojie2010 发表于 2012-4-10 09:16

学习一下................

ljs1988623 发表于 2012-4-10 09:20

支持！！！！！！

eia1981 发表于 2012-4-10 09:25

学习一下{:soso_e100:}

xianingwxb 发表于 2012-4-10 09:35

楼主，佩服。分享一下。谢谢。

查看完整版本: 地下水评价导则一维水质瞬时污染源预测程序（有界面）