混合编程在电法资料处理中的应用.pdfVIP

维普资讯 第31卷第2期 物 探 与 化 探 Vo1．31，No．2 2007年4月 GEOPHYSICAL ＆GEOCHEMICALEXPLORATION Apr．，2007 ?、昆合编程在 电法资料处理中的应用 李凤哲，朱庆俊，任妹娟 (中国地质调查局 水文地质工程地质技术方法研究所，河北 保定 071051) 摘 要：在电法资料解释系统的开发中，VB和Fortran混合编程具有优势：一方面充分利用了已有的用Fortran编写 的成熟的源代码。避免了资源浪费，提高了开发效率 ；另一方面，克服了Fortran界面不美观、图形处理功能欠缺的缺 点。就VB调用Fortran动态链接库进行了详细的介绍 ，最后辅以实例实现了VB和Fortran的混合编程。 关键词：Fortran；VB；混合编程 ；动态链接库 中图分类号：P631 文献标识码：A 文章编号：1000—8918(2007)02—0178—03 Fortran语言适用于科学计算，拥有高精度的数 可用的，具体语法如下： 据结构和运算结构，但其是一种面向过程的语言，在 Subroutinesubname 实现人机对话和交互处理方面远不如面向对象的语 !MS$ATTRIBUTESDLLEXPORT：：subname 言方便。现存的大量电法资料处理程序均采用For- End trail语言编写。为充分利用已有资源，我们采用VB SubName为函数或子程序名；$ATrRIBUTES 和Fortran混合编程方式，实现了电法资料处理子系 是FPS4．0中的元命令 (metacommand)，用于声明微 统的部分功能，提高了应用程序用户界面的友好性。 软扩展属性；DLLEXPORT是上述属性之一，作用就 是声明该函数或子程序能被其他程序或 DLL调用。 1 VB和 Fo~ran混合语言编程 1．2 VB程序中调用动态链接库 混合编程的目的是达到程序简洁、编程效率提 用上面的方式建立动态链接库后就可以通过 高和算法更易实现，本次混合编程采用FortranPow— VB程序调用。VB调用Fortran中的动态链接库前， erStation4．0(以下简称 FPS4．0)和VB6．0为平台， 首先应对被调用的DLL在模块级别中进行如下声 基本思路是用 VB设计用户界面及控制程序，而将 明： 计算用的Fortran程序通过 FPS4．0编译成DLL，并 [PublicIPrivate]DeclareSubnameLib”libname” 由VB调用，它们之间的数据交换通过参数传递来 [Alias”aliasname”][([raglist])] 实现。 Declrae语句的作用是声明对 DLL中外部过程 1．1 Fortran程序中动态链接库的建立 的引用。Alias的具体格式：”一函数名@字节数”，其 所谓动态链接库是可被其他程序或 DLL调用 中函数名是 ．DLL中的函数名，特别注意应该大 的函数(过程)集合组成的可执行文件模块。一个 写；字节数指函数中的变量字节总和，为函数或子程 DLL就是一个函数库，一个 DLL包括一个或多个函 序的参数个数乘以4。 数，这些函数是独立于主工程进行编译、连接和存储 声明之后 ，在 VB中使用 Call语句实现调用 的。FPS4．0为建立动态链接库提供了全面的支持。 DLL中的函数或子程序 ，调用语句如下： 利用 FPS4．0建立动态链接库的方