VB調(diào)用C程序的方法—?jiǎng)討B(tài)鏈接庫法
文中介紹了一種實(shí)現(xiàn)VB調(diào)用C語言程序的方法－動(dòng)態(tài)連接庫法，給出了動(dòng)態(tài)鏈接庫制作的一般框架,通過實(shí)例描述了動(dòng)態(tài)連接庫的實(shí)現(xiàn)及其制做方法、編程步驟,這種方法具有普遍的意義。關(guān)鍵詞 VB 動(dòng)態(tài)連接庫DLL C程序 一、引言 Visual Basic( 以下簡稱VB)是一種可視化的面向?qū)ο蟮木幊陶Z言，以其編程簡單、快捷等特點(diǎn)，深受廣大WINDOWS程序員的青睞。利用VB開發(fā)界面友好、操作方便的軟件只需很短的時(shí)間。但是VB運(yùn)行速度較慢，對(duì)于龐大的科學(xué)計(jì)算問題，VB的這種慢速會(huì)使人難以忍受。C語言是國際上非常流行的一種中級(jí)編程語言，以其靈活、高效等優(yōu)點(diǎn)而獲得廣泛應(yīng)用，許多的應(yīng)用程序都是用C語言在DOS環(huán)境下編寫而成。那么如何發(fā)揮VB和C這兩種語言的優(yōu)勢(shì)，用VB設(shè)計(jì)一種良好的for windows界面來調(diào)用C語言程序，即實(shí)現(xiàn)VB調(diào)用C語言程序呢？現(xiàn)有的文獻(xiàn)只提到動(dòng)態(tài)鏈接庫（以下簡稱DLL）可以將這兩種語言連接起來，但有講動(dòng)態(tài)鏈接庫DLL的制做及其編程方法。本文詳細(xì)介紹了Borland C環(huán)境下制作動(dòng)態(tài)鏈接庫以及VB調(diào)用for dos動(dòng)態(tài)鏈接庫的的方法、步驟，并通過實(shí)例描述VB調(diào)用C程序的全過程。 二、用Borland C編寫DLL程序的方法 要想實(shí)現(xiàn)VB調(diào)用C程序，首先需要用Borland C編寫動(dòng)態(tài)連接庫DLL程序（假設(shè)DLL程序取名為example）。動(dòng)態(tài)鏈接庫包含四個(gè)文件：C語言源程序(.C）、模塊定義文件（.DEF）、原型函數(shù)文件（.H）和工程文件（.PRJ）。下面分別詳細(xì)介紹一下這四種文件的具體結(jié)構(gòu)。1、編寫C語言源程序的框架：C語言源程序（example.C），它包括三種函數(shù)：入口函數(shù)、輸出函數(shù)和終止函數(shù)。其具體
結(jié)構(gòu)如下：
/*************************************/
/* 文件名： example.C */
/*************************************/
#include <windows.h>
/***********入口函數(shù)***********/
int FAR PASCAL LibMain ( HANDLE hInstance,
WORD wDataSeg,
WORD cbHeapSize,
LPSTR lpszCmdLine )
{
if (cbHeapSize!=0)
UnlockData(0);
return （1）;
} /***********輸出函數(shù)***********/ int FAR PASCAL example(int param1,...,char param n)
{
...... /*C語言應(yīng)用程序*/
}
/***********終止函數(shù)***********/
int FAR PASCAL WEP ( int /*SystemExit*/ )
{
return(1);
}
以上各組成部分參數(shù)的含義：Windows.h頭文件，它包含有數(shù)據(jù)類型的定義、API入口點(diǎn)定義和其它有用的參數(shù)信息。PASCAL說明符定義該程序的傳遞參數(shù)和凈化堆棧的協(xié)定（注意：DLL外部傳送的指針必須是遠(yuǎn)指針FAR）。LibMain帶四個(gè)參數(shù)：hInstance、 wDataSeg、cbHeapSize和lpszCmdLine。第一個(gè)參數(shù)hInstance是DLL事例句柄， wDataSeg參數(shù)是數(shù)據(jù)段（DS）寄存器值，bHeapSize參數(shù)是在模塊定義文件中定義的堆的大小，LibMain 使用該值使本地堆初始化。lpszCmdLine參數(shù)包括命令行信息，但很少被DLL使用。一般來說，這四個(gè)參數(shù)是制作DLL通用的參數(shù)。如果不想讓DLL數(shù)據(jù)被封住，那么必須調(diào)用unlockdata恢復(fù)正常的非鎖狀態(tài)，如果DLL初始化已經(jīng)成功，DLL則返回1，若不成功則返回0值，且 DLL退出系統(tǒng)。DLL的輸出函數(shù)實(shí)現(xiàn)用戶所要完成的任務(wù)，這部分是DLL的核心。它與一般C語言程序不同之處在于無scanf函數(shù)。所有的外部指針都是遠(yuǎn)指針FAR。畫直線函數(shù)要用lineto函數(shù)。DLL包括一個(gè)終止函數(shù)，終止函數(shù)有時(shí)稱為退出函數(shù)，它的名字必須是WEP。且它可以被包括在DLL模塊定義文件的EXPORTS段中。
2、模塊定義文件（.DEF)的結(jié)構(gòu)和各段的意義
模塊定義文件的結(jié)構(gòu)如下：
/*************************************/
/* 文件名： example.DEF */
/*************************************/
LIBRARY example /* DLLname */
DESCRIPTION ' example.DLL'
EXETYPE WINDOWS
CODE PRELOAD MOVEABLE DISCARDABLE
DATA PRELOAD MOVEABLE SINGLE
HEAPSIZE 1024
EXPORTS
example @1
WEP @2
關(guān)鍵字LIBRARY是把這個(gè)模塊視為一個(gè)DLL，庫的名字example跟在其后，且必須與該庫的名字、DEF中的DLL的文件名相一致。DESCRIPTION語句采用一個(gè)字符串，其長度可達(dá)128 個(gè)字符，通常用它來保存模塊描述的信息。EXETYPE windows語句每個(gè)windows應(yīng)用程序和 DLL都需要。DATA語句定義該庫數(shù)據(jù)段的內(nèi)存屬性，關(guān)鍵字MOVEABLE允許內(nèi)存管理程序在 必要時(shí)移動(dòng)內(nèi)存段，關(guān)鍵字SINGLE是DLL必要，因?yàn)镈LL總是有一個(gè)單一數(shù)據(jù)段，而不管訪 問它的應(yīng)用程序的數(shù)量。HEAPSIZE語句用來定義一個(gè)DLL局部堆的初始規(guī)模，執(zhí)行局部內(nèi) 存分配的DLL必須在庫啟動(dòng)時(shí)使該堆初始化，堆的大小被傳送給DLL的LiEntry的程序。然 后用該堆的大小調(diào)用Locallnit使DLL的'局部堆初始化。 EXEPORTS語句定義將被用作來自應(yīng)用程序或來自其它DLL入口點(diǎn)的程序，windows利用這個(gè)信息建立一個(gè)序數(shù)入口值，序數(shù)入口值是一個(gè)優(yōu)化的值，允許動(dòng)態(tài)連接機(jī)制更快塊操作且使用較少的內(nèi)存。 一般來說，模塊定義文件（.DEF)的結(jié)構(gòu)除取動(dòng)態(tài)庫的名字不同外，其它結(jié)構(gòu)都是固定的。
3．建立原形函數(shù)文件(.H)
原形函數(shù)的功能是進(jìn)一步聲明調(diào)用函數(shù)的函數(shù)名和傳遞的參數(shù)，其形式為：
/*************************************/
/* 文件名： example.H */
/*************************************/
extern "C" int _export FAR PASCAL example(int param1,...,char param n) ;
4．建立工程文件(.PRJ)
工程文件中包含有example.C、example.DEF兩個(gè)文件后，然后編譯連接生成動(dòng)態(tài)鏈接庫即可。
以上是制作動(dòng)態(tài)連接庫的框架，現(xiàn)在通過一個(gè)實(shí)例介紹制作動(dòng)態(tài)鏈接庫的方法。如要求程序完成功能為：打開一個(gè)數(shù)據(jù)文件讀出前兩個(gè)數(shù)據(jù)，將這兩個(gè)數(shù)與所傳遞的兩個(gè)參數(shù)相加，返回它們的和。設(shè)該DLL程序的名字為ADD。
第一步：在Borland C++環(huán)境下編輯.C文件、.DEF文件和.H文件，并建立.PRJ文件。如
（1）編寫C語言源程序清單：
/*************************************/
/* 文件名： ADD.C */
/*************************************/
#include <iostream.h>
#include <conio.h>
#include <io.h>
#include <alloc.h>
#include <stdlib.h>
#include <windows.h>
#include <math.h>
#include <stdio.h>
#include "c:\ADD.h"
/*入口函數(shù)*/
int FAR PASCAL LibMain (HANDLE hInstance ,
WORD wDataSeg ,
WORD cbHeapSize,
LPSTR lpszCmdLine )
{
if (cbHeapSize!=0)
UnlockData(0);
return 1;
}
/*輸出函數(shù)*/
int FAR PASCAL ADD(int x,int y,char *filein)
{ int a,b；
fp=fopen(filein,"r");
if(fp==NULL) { exit(0);}
int temp1=0,temp2=0;
fscanf(fp,"%d",&a);
fscanf(fp,"%d",&b);
temp1=x+a;
temp2=y+b;
temp1=temp1+temp2;
fclose(fp);
return(temp1);
}
/*退出函數(shù)*/
int FAR PASCAL WEP ( int/*SystemExit*/ )
{
return(1);
}
2）ADD.DEF文件的程序清單：
/*************************************/
/* 文件名： ADD.H */
/*************************************/
LIBRARY ADD
DESCRIPTION 'ADD.DLL'
EXETYPE WINDOWS
CODE PRELOAD MOVEABLE DISCARDABLE
DATA PRELOAD MOVEABLE SINGLE
HEAPSIZE 1024
EXPORTS
ADD @1
WEP @2
（3）ADD.H程序清單：
/*************************************/
/* 文件名： ADD.H */
/*************************************/
extern "C" int _export FAR PASCAL add(int x,int y,char *filein) ;
（4）建立工程文件：
在Borland C++環(huán)境下的project項(xiàng)中打開open project file項(xiàng)并建立ADD.prj，在add item中加入ADD.C文件和ADD.DEF文件即可建立工程文件。第二步，在Borland C的options項(xiàng)的Applation中選擇Windows DLL，再在Compile中選擇Build all，這樣就可生成動(dòng)態(tài)鏈接庫ADD.DLL供VB調(diào)用。 三、VB3.0調(diào)用動(dòng)態(tài)鏈接庫DLL方法 制作好DLL之后，就可以用VB調(diào)用它，實(shí)現(xiàn)VB調(diào)用C程序。VB程序要使用DLL中的函數(shù)， 首先必須要有特殊的聲明，用Declare聲明語句在窗體級(jí)或模塊級(jí)或全局模塊的代碼聲明段進(jìn)行聲明，將動(dòng)態(tài)鏈接庫中的函數(shù)聲明到VB中，供VB程序調(diào)用。語句格式為：Declare Sub 過程名Lib摽鈹黚_n[ Alias " 別名]（[ByVal 參數(shù)AS類型]），或?yàn)镈eclare Function函數(shù)名Lib摽鈹黚_衃 Alias " 別名]（[ByVal 參數(shù)AS類型]）AS類型在聲明中首先用Declare關(guān)鍵字表示聲明DLL中的函數(shù)。在C語言中有的函數(shù)類型為VOID，它表示不具有返回值，則必須用關(guān)鍵字Sub將其聲明成過程。有的函數(shù)具有返回值，則必須用關(guān)鍵字Function將其聲明成函數(shù)，并且在聲明語句的最后要用AS關(guān)鍵字指明函數(shù)返回值的類型。例如上面的ADD.DLL在VB中就可以聲明為：
Declare Function ADD Lib撫c:\ADD.dll敚―ByVal X AS Integer, ByVal Y AS Integer ,ByVal filein as string）AS Integer通過此聲明語句將函數(shù)ADD聲明到VB中，便可直接調(diào)用。 四、結(jié)束語 以上詳細(xì)介紹了Borland C環(huán)境下制作動(dòng)態(tài)鏈接庫以及VB調(diào)用for dos動(dòng)態(tài)鏈接庫的方法、步驟，并通過實(shí)例說明VB調(diào)用C語言程序的方法。舉例程序ADD經(jīng)VB3.0編譯，在486微機(jī)上調(diào)試通過。本文介紹的方法具有廣泛的意義，也完全適用于C++ 語言程序。
【VB調(diào)用C程序的方法—?jiǎng)討B(tài)鏈接庫法】相關(guān)文章：
2.利用VB實(shí)現(xiàn)對(duì)IE的調(diào)用與控制
3.在C++ 程序中調(diào)用被C 編譯器編譯后的函數(shù)，為什么要加extern ＂C
5.最新納稅信用級(jí)別動(dòng)態(tài)調(diào)整方法和程序