分享如何在VB中調(diào)用VC編寫的DLL
一般來說,VB和VC共同編程有3種方式:一種是VC生成DLL,在VB中調(diào)用DLL;一種是VC生成ActiveX控件(.ocx),在VB中插入;還有一種是在VC中生成ActiveX Automation服務(wù)器,在VB中調(diào)用。相對而言,第一種方法對VC編程者的要求最低,但要求你的伙伴進(jìn)行配合,我推薦這種方法。
先說說VC++的編程。首先在VC++中生成Win32 DLL工程。在這個(gè)工程中添加幾個(gè)函數(shù)供VB用戶調(diào)用。一個(gè)DLL中的函數(shù)要想被VB調(diào)用,必須滿足兩個(gè)條件:一是調(diào)用方式為stdcall,另一個(gè)是必須是export的。要做到第一條,只須在函數(shù)聲明前加上__stdcall關(guān)鍵字。如:
short __stdcall sample(short nLen, short *buffer)
要做到第二條,需要在*.def文件中加上如下的幾行:
EXPORTS
sample @1
這里的sample是你要在VB中調(diào)用的函數(shù)名,@1表示該函數(shù)在DLL中的編號(hào),每個(gè)函數(shù)都不一樣。注意這里的函數(shù)名是區(qū)分大小寫的。至于你說的需要傳遞大量數(shù)據(jù),可以這樣做,在VB中用一個(gè)數(shù)組存放數(shù)據(jù),然后將該數(shù)組的大小和地址傳給VC(至于如何在VB中編程我會(huì)在下面介紹)。就象上面的例子,nLen是數(shù)組大小,buffer是數(shù)組地址,有了這兩條,你可以象使用VC的數(shù)組一樣進(jìn)行處理了。至于輸出圖形,可以生成WMF或BMP格式,讓VB調(diào)用。不過,我認(rèn)為也可以直接輸出到視窗,只要VB將窗口的句柄hWnd和hDC以及視窗的繪圖位置(VB和VC采用的坐標(biāo)系必須一致才行)傳給VC就行了。而VB的AutoRedraw屬性必須為False,在Paint事件中調(diào)用VC的繪圖程序。
再談?wù)刅B的編程。VB調(diào)用DLL的方法和調(diào)用Windows API的方法是一樣的,一般在VB的書中有介紹。對于上面一個(gè)例子,先要聲明VC函數(shù):
Declare Function sample Lib "mydll.dll" (ByVal nLen As Integer, buffer As Integer) As Integer
這里mydll.dll是你的dll的名字。你可能已經(jīng)注意到了兩個(gè)參數(shù)的聲明有所不同,第一個(gè)參數(shù)加上了ByVal。規(guī)則是這樣的:如果在VC中某個(gè)參數(shù)聲明為指針和數(shù)組,就不加ByVal,否則都要加上ByVal。在VB中調(diào)用這個(gè)函數(shù)采用這樣的語法:
sample 10, a(0)
這里的a()數(shù)組是用來存放數(shù)據(jù)的,10為數(shù)組長度,這里的第二個(gè)參數(shù)不能是a(),而必須是要傳遞的數(shù)據(jù)中的第一個(gè)。這是VB編程的關(guān)鍵。
下面在說幾個(gè)可能遇到的問題。一個(gè)問題是VB可能報(bào)告找不到dll,你可以把dll放到system目錄下,并確保VB的Declare語句正確。另一個(gè)問題是VB報(bào)告找不到需要的函數(shù),這通常是因?yàn)樵赩C中*.def文件沒設(shè)置。第三種情況是VB告訴不能進(jìn)行轉(zhuǎn)換,這可能是在VC中沒有加上__stdcall關(guān)鍵字,也可能是VB和VC的參數(shù)類型不一致,注意在VC中int是4個(gè)字節(jié)(相當(dāng)于VB的Long),而VB的Integer只有2個(gè)字節(jié)。必須保證VB和VC的參數(shù)個(gè)數(shù)相同,所占字節(jié)數(shù)也一致。最后一個(gè)要注意的問題是VC中絕對不能出現(xiàn)數(shù)組越界的情況,否則會(huì)導(dǎo)致VB程序崩潰
1. 調(diào)用DLL的優(yōu)越性
動(dòng)態(tài)鏈接庫(DLL)作為Windows操作系統(tǒng)的基礎(chǔ),具有優(yōu)越的應(yīng)用性能:
DLL擴(kuò)展了應(yīng)用程序的特性。由于DLL能夠動(dòng)態(tài)地裝入進(jìn)程的地址空間,因此應(yīng)用程序能夠在運(yùn)行時(shí)確定需要執(zhí)行什么操作,然后裝入相應(yīng)的代碼,以便根據(jù)需要執(zhí)行這些操作。
DLL可以用多種語言進(jìn)行編寫。例如用VB來編寫應(yīng)用程序的界面,而用C++來編寫諸如算法、通訊之類的底層操作。
DLL簡化了軟件項(xiàng)目的管理。如果在軟件開發(fā)過程中不同的工作小組在不同的模塊上工作,那么這個(gè)項(xiàng)目管理起來比較容易。
DLL有助于節(jié)省內(nèi)存。如果兩個(gè)或多個(gè)應(yīng)用程序使用同一個(gè)DLL,那么該DLL的頁面只要放入RAM一次,所有的應(yīng)用程序都可以共享它的各個(gè)頁面。
DLL有助于資源的共享。DLL可以包含對話框模板、字符串、圖標(biāo)和位圖等資源,多個(gè)應(yīng)用程序能夠使用DLL來共享這些資源。
DLL有助于應(yīng)用程序的本地化。例如,只包含代碼而不包含用戶界面組件的應(yīng)用程序可以加載包含本地化用戶界面組件的DLL 。
DLL有助于解決平臺(tái)差異。不同版本的Windows配有不同的函數(shù),開發(fā)人員常常想要調(diào)用新的函數(shù)。但是,如果源代碼包含了對一個(gè)新函數(shù)的調(diào)用,而應(yīng)用程序?qū)⒁诓荒芴峁┰摵瘮?shù)的Windows版本上運(yùn)行,那么操作系統(tǒng)的加載程序?qū)⒕芙^運(yùn)行該進(jìn)程。如果將這些新函數(shù)保存在DLL中,那么應(yīng)用程序就能夠?qū)⑺鼈兗虞d到Windows的老版本上,就可以成功地調(diào)用該函數(shù)。
2.找到DLL的入口點(diǎn)
初次接觸DLL的用戶經(jīng)常會(huì)遇到一個(gè)問題:在VC環(huán)境下創(chuàng)建的DLL,在VC里運(yùn)行的好好的,可在VB應(yīng)用程序中調(diào)用時(shí)卻老是出現(xiàn)"調(diào)用約定錯(cuò)誤"、"找不到入口點(diǎn)"之類的錯(cuò)誤。這主要是由以下疏漏造成的。
首先,要注意DLL中的函數(shù)和VB中的函數(shù)聲明在名稱、返回類型、參數(shù)類型、參數(shù)個(gè)數(shù)等方面必須完全相同,尤其要注意大小寫的問題。
其次,在DLL的.def文件中必須加上入口函數(shù)。
最后,在函數(shù)定義前必須加上extern "c",_stdcall關(guān)鍵字。
具體格式可參看應(yīng)用實(shí)例。
3.?dāng)?shù)組參數(shù)在DLL中的傳遞
由于DLL經(jīng)常用來進(jìn)行一些底層的運(yùn)算操作,因此應(yīng)用程序常需要傳遞大量的數(shù)據(jù)給DLL。在C++中,指針是進(jìn)行數(shù)組操作的最佳選擇,但VB中沒有指針的概念。這通??捎脙煞N方法來解決。
其一,在VB中聲明DLL時(shí),用byref來代替byval,即可將數(shù)組指針傳遞給DLL。
另外,將數(shù)組聲明為變體型(variant),即可直接將數(shù)組傳遞給DLL。
4.應(yīng)用實(shí)例
以下通過一具體實(shí)例來說明在VB中調(diào)用VC環(huán)境下創(chuàng)建的DLL的過程。
創(chuàng)建一用于信號(hào)處理的DLL,"SigPro.dll",其中有一個(gè)用于富氏計(jì)算的函數(shù)"Fourier"。
VC中的聲明:
在"SigPro.h"中加入以下代碼,
extern "C"
{
double EXPORT _stdcall Fourier(long int *Sample,int NumSam,int OvertoneOrder,bool SinOrCos);
}
在"SigPro.cpp"中加入以下代碼,
extern "C"
double EXPORT _stdcall Fourier(long int *Sample,int NumSam,int OvertoneOrder,bool SinOrCos)
{
int i;
double result=0.0;
if(SinOrCos==true)
{
for(i=0;i<NumSam;i++)
{
result=result+*(Sample+i)*cos(OvertoneOrder*i*2*3.1415926/NumSam);
}
}
else
{
for(i=0;i<NumSam;i++)
{
result=result+*(Sample+i)*sin(OvertoneOrder*i*2*3.1415926/NumSam);
}
}
result =result*2/NumSam;
return result;
}
在"SigPro.def"中加入以下代碼,
EXPORTS
Fourier
VB中的調(diào)用聲明:
Public Declare Function Fourier Lib "SigPro" (ByRef Sample() As Long, ByVal NumSam As Integer, ByVal OvertoneOrder As Integer, ByVal SinOrCos As Boolean) As Double
上一篇:VBS實(shí)現(xiàn)的系統(tǒng)服務(wù)備份優(yōu)化代碼
欄 目:vb
下一篇:使用VBS訪問外部文本文件一些方法和腳本實(shí)例代碼
本文標(biāo)題:分享如何在VB中調(diào)用VC編寫的DLL
本文地址:http://mengdiqiu.com.cn/a1/vb/7342.html
您可能感興趣的文章
- 01-10VBS教程:正則表達(dá)式簡介 -正則表達(dá)式
- 01-10VBS教程:方法-Exists 方法
- 01-10ipclear.vbs源代碼
- 01-10bytes2BSTR
- 01-10如何使用腳本鎖定任務(wù)欄?
- 01-10如何產(chǎn)生真正的隨機(jī)函數(shù)?
- 01-10運(yùn)行腳本之前,如何確定計(jì)算機(jī)上的默認(rèn)腳本宿主的代碼
- 01-10如何調(diào)試JScript/VBScript的方法
- 01-10如何通過計(jì)劃任務(wù)調(diào)用QuickTest測試腳本
- 01-10windows腳本調(diào)試howto的方法


閱讀排行
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實(shí)例說明
隨機(jī)閱讀
- 01-10使用C語言求解撲克牌的順子及n個(gè)骰子
- 01-11ajax實(shí)現(xiàn)頁面的局部加載
- 08-05織夢dedecms什么時(shí)候用欄目交叉功能?
- 04-02jquery與jsp,用jquery
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 08-05DEDE織夢data目錄下的sessions文件夾有什
- 01-10delphi制作wav文件的方法
- 01-10C#中split用法實(shí)例總結(jié)
- 08-05dedecms(織夢)副欄目數(shù)量限制代碼修改
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置