VB调用VC dll的返回方式

第一种类型:数值传递
注意:在VB中,认变量传递方式为ByRef为地址,而传递值就是用ByVal,还要注意在C++中,
int类型的变量是32位的,在VB中要用long型变量来配合。
VC++部分:


.def文件
EXPORTS TestCalc

VB部分
声明:

调用




第二种类型:传递字符串,主要用于字符串返回或者处理。

VC++部分:


.def文件
EXPORTS MidStr


VB部分:
声明:

调用


第三种类型:传递数组和变量指针,主要用于从dll中读出大量数据


VC++部分:


.def文件
EXPORTS TestByte

VB部分
声明:

调用

第四种类型:传递字符串数组

1、VB TO VC :

VC部分:


VB 部分:
声明:




2、VB TO VC

VB的字符串数组是由BSTR组成的SafeArray类型,所以VB里DLL函数如此声明:
Private Declare FunctionMyFun Lib "MyDll" (ByVal strarr As Variant) As Long

建立MFC DLL工程,名为 ShowVBStrArr 编译生成 ShowVBStrArr.DLL
DLL函数原形:


在DLL工程的def文件里编辑如下:
EXPORTS
ShowVBStrArray


VB源码:
Option Explicit
Private Declare Function ShowVBStrArray Lib "xxx.dll" (ByVal pstr As Variant) As Long

Private Sub Command1_Click()
Dim prompt(1) As String
prompt(0) = "Hello"
prompt(1) = "World"

ShowVBStrArray prompt
End Sub

第五种 传结构体

由于需要根据需求向DLL中传入多种值或者需要从DLL中返回多种数据,都可以传结构体,不过得注意VB和VC的类型对应。具体操作如下: VC部分:

声明:

结构体定义:

VB部分:

声明:

结构体定义:

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...