土木工程软件开发PPT课件下载推荐.ppt

土木工程软件开发PPT课件下载推荐.ppt

《土木工程软件开发PPT课件下载推荐.ppt》由会员分享，可在线阅读，更多相关《土木工程软件开发PPT课件下载推荐.ppt（13页珍藏版）》请在冰豆网上搜索。

结论一：

选择VB作为主系统的开发语言。

策略二：

因FORTRAN语言由于其丰富数据类型以及模块化语言结构，非常适合数值分析类程序，加之国内拥有大量以该语言编制的工程分析程序和标准算法库，所以资源丰富，如果解决与VB的接口问题，以该语言作为分析模块的开发，有很大优势。

结论二：

选择FORTRAN语言作为分析模块的开发语言。

策略三：

虽然国内拥有大量的绘图软件，但AUTOCAD软件在国内的普及率最高，且该软件具有丰富的二次开发接口和标准图形文件格式，因此我们得到的第三个结论是。

选择AUTOCAD软件作为支撑软件，作为施工图纸的自动输出工具应该是,工程软件的开发策略,策略四：

office软件包是国内办公系统的必备软件，且其与VB留有接口，因此我们的结论四：

选择该软件包里的WORD和EXCEL作为计算书自动生成软件。

策略五：

因VB中的ADO对象与ODBC配合可以访问并操作许多类型的数据库，包括远程数据，而ACCESS是大家熟知的数据库，因此我们有结论五：

VB的ADO对象加上ACCESS数据库作为工程数据库开发工具。

策略六：

MCS51系列单片机采用INTEL8080汇编语言，在国内应用非常广泛，所以结论六：

采用INTEL8080汇编语言VB相结合进行工程数据采集。

土木工程软件开发相关的技术,VB与FORTRAN的接口利用VB开发工程数据库相关的概念和技术。

利用VB开发AUTOCAD软件的接口。

利用VB开发OFFICE软件的接口。

利用VB开发动态网页。

VB与FORTRAN的接口,主要方法

（1）利用动态链接库实现混合编程。

（2）VB直接调用Fortran执行文件。

利用动态链接库方法,DLL（动态链接库）是可被其他程序或DLL调用的函数（过程）集合组成的可执行文件模块。

Windows本身提供了大量的应用程序接口（API）函数，都是通过DLL机制来实现的。

DLL之所以在Windows中被广泛应用，是因为它除了具有静态链接库的功能外，尚有如多个应用程序共享一个DLL以节省内存和磁盘空间等许多优点。

利用动态链接库方法,可根据需要将一组Fortran函数或子程序放在一个程序中，创建成一个DLL，它本身不能运行，只能被VB调用。

具体实现步骤如下：

建立一个NewProject，定义其类型为DynamicLinkLibrary，然后将一个只含有函数或子程序的Fortran程序加入到Project中，编译通过即可生成DLL。

在Fortran程序中，必须将被调用的函数或子程序予以声明，以标识这些函数或子程序在所生成的DLL中是可用的,利用动态链接库方法的示例代码,

（1）在Fortran开发环境下编制可供VB调用的forlib.dll文件,包含二个函数和一个子程序,realfunctioncircle_area（radius）!

DEC$ATTRIBUTESDLLEXPORT:

CIRCLE_AREA!

DEC$ATTRIBUTESALIAS:

Circle_Area:

CIRCLE_AREAimplicitnonerealradiusreal,parameter:

PI=3.14159circle_area=radius*radius*PIreturnendfunction,integerfunctionsum（a）!

SUMimplicitnoneinteger:

a（10）integerisum=0doi=1,10sum=sum+a（i）enddoreturnendfunction,subroutineMakeLower（string）!

MAKELOWERimplicitnonecharacter（len=*）:

stringinteger:

len,i,codelen=len_trim（string）doi=1,lencode=ichar（string（i:

i）if（code=ichar（a）.and.code=ichar（z）thenstring（i:

i）=char（code-32）endifenddoreturnendsubroutine,利用动态链接库方法的示例代码,

（2）在VB下编写如下代码：

PrivateDeclareFunctionCircle_AreaLibH:

forlib.dll（rAsSingle）AsSinglePrivateDeclareSubMAKELOWERLibforlib.dll（ByValsAsString,ByValiAsLong）PrivateDeclareFunctionSUMLibforlib.dll（rAsLong）AsLongPrivateSubCommand1_Click（）DimrAsSingleDimaAsSingler=Val（Text1.Text）a=Circle_Area（r）Label3=Str（a）EndSub,PrivateSubCommand2_Click（）DimsAsStrings=Text2.TextCallMAKELOWER（s,Len（s）Text2.Text=sEndSub,PrivateSubCommand3_Click（）Dima（10）AsLongDimiAsLongDimtotalAsLongFori=0To9a（i）=Rnd（）*9+1NextiLabel4.Caption=Str（a（0）Fori=1To9Label4.Caption=Label4.Caption+Str（a（i）Nextitotal=SUM（a（0）Label4.Caption=Label4.Caption+=+Str（total）EndSub,VB直接调用Fortran执行文件。

这是一种最简单明了的办法，不必修改原程序，接口可通过读取数据文件方法处理，VB中直接调用shell函数即可。

Shell（pathname,windowstyle）Shell函数的语法含有下面这些命名参数：

pathname必要参数。

Variant（String），要执行的程序名，以及任何必需的参数或命令行变量，可能还包括目录或文件夹，以及驱动器。

Windowstyle可选参数。

Variant（Integer），表示在程序运行时窗口的样式。

如果windowstyle省略，则程序是以具有焦点的最小化窗口来执行的。

VB直接调用Fortran执行文件。

PrivateSubCommand6_Click（）DimsdAsStringsd=Shell（c:

uuu.exe,vbNormalFocus）EndSub,