Fortran和VB混合编程在场地剪切波速测试中的实现-山东国土资源.PDF

第２４卷第９期　　　　　　　　　　　　　　　山东国土资源　　　　　　　　　　　　　　２００８年９月 Ｆｏｒｔｒａｎ和ＶＢ混合编程 在场地剪切波速测试中的实现 １ ２ １ ３  安 辉 ，赵昌朋 ，杨明爽 ，李 丽 （１．山东省地质工程勘察院，山东烟台　２６４０００；２．烟台大学土木工程学院，山东烟台　２６４００５；３．易特斯 （烟台）精密纺织器械有限公司，山东烟台　２６４００６） 摘要：基于互相关函数和ＶＢ，Ｆｏｒｔｒａｎ混合编程技术开发的单孔法剪切波速测试分析软件，具有自动计算剪切波速 和自动生成剪切波速报告的功能，因而提高了剪切波速测试工作的效率。在列举以场地剪切波速测试数据处理实 例的基础上，介绍软件开发中采用的ＶＢ直接调用Ｆｏｒｔｒａｎ编译的可执行文件、通过ＤＡＴ文件保存数据实现、二者的 数据交换及自动生成Ｗｏｒｄ报告的方法。 关键词：混合语言编程，数据交换，动态链接，单孔法，剪切波速 中图分类号：Ｐ２０４　　　　文献标识码：Ａ 　　Ｆｏｒｔｒａｎ语言适合科学计算，然而，Ｆｏｒｔｒａｎ语言 应该着重研究和进一步提高的［１］。 可视化编程难度较大。ＶＢ是一种可视化的编程工 ［２］ 《建筑抗震设计规范》（ＧＢ５００１１—２００１） 规 具，其界面的设计、数据库管理等功能强大，简便快 定了建筑场地类别划分方法。建筑场地类别，根据 捷，但是对于数值计算方面能力欠佳。用 ＶＢ和 土层等效剪切波速和场地覆盖层厚度分为４类，对 Ｆｏｒｔｒａｎ混合编程技术开发的科学计算软件，既能解 场地覆盖层厚度、等效剪切波速和场地类别的判断 决复杂的大型计算问题，又具有良好的人机交互界 都直接依赖于剪切波速。 面，结合了二者的优点。文中以场地剪切波速测试 波速测试方法主要有单孔法、跨孔法和面波法， 的数据处理为例，介绍Ｆｏｒｔｒａｉｎ语言和ＶＢ语言混合 其中面波法是目前波速测试方法研究中的热点，单 编程的实现。具体采用ＶＢ来设计界面，并将主程 孔法则是工程中应用比较广泛的方法。在《地基动 序放在ＶＢ中；将Ｆｏｒｔｒａｎ语言编制的程序编译成可 力特性测试规范》（ ［３］ ＧＢ／Ｔ５０２６９—１９９７） 中都有提 执行文件，然后在ＶＢ中用改进后的ｓｈｅｌｌ函数同步 及。单孔法波速测试的要求，该方法利用水平锤击、 调用可执行文件。 上压汽车前轮（或其他重物）的木板激发剪切波，木 １　土层剪切波速 板下部铺砂土垫平以保证与地面紧密接触，再埋设 触发传感器。根据工程情况及地质分层，每隔１～３ 土层剪切波速是土工抗震中的一个重要物理 ｍ布置一个测点，自下而上按预定测点深度进行测 量。当今在土工抗震工程中，对剪切波速的应用和 试。由井下探头记录的波形剪切波的初至时刻和激 研究有：作为划分建筑物场地土类别的定量界限；作 为评价地基饱和土液化可能性的依据之一；作为土