分享
 
 
 

VB与VC通信初探(一)

王朝vc·作者佚名  2006-01-09
窄屏简体版  字體: |||超大  

在使用VB调用VC写的DLL的时候,可以实现一些VB不能实现或者很难实现的功能,但是,因为VB与VC之间的数据类型并不总是完全对应的,所以,在进行参数传递的时候,就需要进行类型转换了。下面我将通过逐步的推进的方法,来看看如何达到VB与VC之间的通信。

首先,看一个简单的例子。

VC中的程序:

extern "C" _declspec(dllexport) void ReadString(void)

{

//函数功能

}

将这个VC程序编译成DLL程序供VB调用(假设生成的为commication.dll)

VB中的程序:

……………………

Private Declare Function ReadString Lib "commication.dll" ()

……………………

call ReadString

在这里,我们实现了一个简单的通信,即在VC中写了一个DLL,然后再在VB中调用了这个DLL,但是,在这次的通信中,实际上他们之间没有传递任何数据,仅仅是VB调用了DLL,从而使得commication.dll中的函数ReadString()函数执行。这种通信实现是非常简单,所以他完成的功能也就非常的简单,然而我们的要求肯定不止于此。

现在就让我们来实现一个使用DLL来处理VB中的数据的例子,并且将处理结果返回给VB程序:

VC中的程序:

extern "C" _declspec(dllexport) bool ReadString(bool receive)

{

if(receive==true)

return true;

else

return false;

}

VB中的程序:

……………………

Private Declare Function ReadString Lib "commication.dll" (ByVal send As Boolean) as Boolean

……………………

Dim result As Boolean

Dim send As Boolean

send = False

result = ReadString(send)

If result Then

MsgBox "The return value is 'true'"

Else

MsgBox "The return value is 'false'"

End If

在这次的通信过程中,我们还是实现了一个很简单的通行过程,在DLL中,根据VB调用的时候传递进来的参数将接收到的参数返回给了VB调用程序,虽然简单,但是已经实现了VB与DLL之间的数据传递了,在这里要注意的是它们之间的数据类型,布尔类型的数据在VC中使用的关键字是Boolean,而在VC中使用的关键字则是bool。

由于VB与VC之间的数据类型没有相同的关键字,为了方便,下面列出常用数据类型在VC与VB中分别使用的关键字以及它们之间的对应关系:

c中的数据类型 VB中的声明 结果

ATOM ByVal variable As Integer 结果为Integer 类型的表达式

BOOL ByVal variable As Boolean 结果为 Long 类型的表达式

BYTE ByVal variable As Byte 结果为 Byte 类型的表达式

CHAR ByVal variable As Byte 结果为 Byte 类型的表达式

COLORREF ByVal variable As Long 结果为 Long 类型的表达式

DWORD ByVal variable As Long 结果为 Long 类型的表达式

HWND, HDC, HMENU ByVal variable As Long 结果为 Long 类型的表达式等Windows 句柄

INT, UINT ByVal variable As Long 结果为 Long 类型的表达式

LONG ByVal variable As Long 结果为 Long 类型的表达式

LPARAM ByVal variable As Long 结果为 Long 类型的表达式

LPDWORD variable As Long 结果为 Long 类型的表达式

LPINT, LPUINT variable As Long 结果为 Long 类型的表达式

LPRECT variable As type 自定义类型的任意变量

LPSTR, LPCSTR ByVal variable As String 结果为 String 类型的表达式

LPVOID variable As Any 任何变量(在传递字符串的时候使用ByVal)

LPWORD variable As Integer 结果为Integer 类型的表达式

LRESULT ByVal variable As Long 结果为 Long 类型的表达式

NULL As Any 或 ByVal Nothing 或 ByVal variable As Long ByVal 0& 或 VBNullString

SHORT ByVal variable As Integer 结果为Integer 类型的表达式

VOID Sub procedure 不可用

WORD ByVal variable As Integer 结果为Integer 类型的表达式

WPARAM ByVal variable As Long 结果为 Long 类型的表达式

好了,现在我们已经建立了基本的通信模式了,并且实现了两个简单的通信过程,该休息一下了,之后再来看看更复杂的通信该如何去实现了!(待续)

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有