VB+VC混合编程疑难问题解

我们在编写Visual Basic应用程序的时候常常需要自己动手编写一些库函数或ActiveX控件，而这些函数或者控件常常采用VC++语言来写，因而也常为VB和VC两种语言之间不同参数类型、内存空间使用方法等问题为难，怎么做好呢？本文介绍了在VB和VC混合编程的情况下对这些问题的解决方法。

　　一、自定义类型参数向DLL库函数的传递

　　用VB, VC++进行混合编程时，通常需要在VB中调用VC++编写的DLL库函数，这时，一般都要遇到向库函数传递参数的问题。对于标准类型(如Double, Long等)参数，其传递比较简单，只要保证了VB中对库函数的声明和VC++中对库函数的定义在参数类型、次序和传递方式上的一致性，参数就不会被错误传递。但是，如果需要向库函数传递自定义类型的参数，情况就会变得复杂了。

　　情况一：自定义类型的所有成员变量都是同一种类型(例如下面的Pens自定义类型，其成员都为Long型)。

Type Pens 　RedPenNum As Long 　GreenPenNum As Long 　B1uePenNum As Long End Type

　　这时，只要在VB和VC++中对该结构采用相同的定义，并充分注意到VB和VC++对某些数据类型(如32，位操作系统下，VC++中的int和VB中的Integer)存储上的差异，就不会发生参数传递错误。

　　情况二：自定义类型中成员变量的类型不完全一致。这时，又要区分两种情况：

　　情况(1)没有Double型成员变量。

　　这时一般也不会出现参数的传递错误。

　　情况(2)含有Double型成员变量。

　　这时参数通常就会被误传。比如传递下面的Person类型的参数到VC++开发的DLL库函数，Double型成员Height的值就会在传递中丢失：

Type Person Age As Long Height As Double End Type

　　造成Height值丢失的原因是由于在VC++中存储Person型变量时，将自动在Long型成员Age和Double型成员Height之间插入若干字节的分隔空间，而VB则不会。所以，VC++中存储一个Person型变量需要的内存要多于12字节，而VB只需要12个。因此，从VB传入DLL库函数的Person型变量就不能被正确接收。

　　解决这一问题的方法有多种，这里介绍一种比较简便和普适的，称之为“引入补位成员法”:在Person这种自定义类型中引入若干个内存补位成员，使得任一个Double型成员之前的所有成员占用的字节总数都是单个Double型变量所占字节数的整数倍(8的整数倍)。

　　仍以Person类型为例，由于Age成员占用4字节内存，所以要在其后引入一个占用4字节的补位成员，不妨引入一个String型的成员Tempst：

Type Person 　Age As Long 　Tempst As String*4 　Height As Double End Type

　　于是，Double型成员Height之前的所有成员占用的内存总数变成了8个字节，是8的整数倍。此时，将DLL库函数中对Person的定义作同样的修改后，就可以正确接收从VB传来的Person型参数了。

　　注意：引入补位成员时，不但要合理分配其占用的字节数，而且要正确安排其在结构体中的位置，二者缺一不可。上例中，若把补位成员放在Height之后， Doubl型变量Height之前的所有成员占用的字节总数仍然是4，不是8的整数倍。

　　在自己编写DLL库函数时，往往会在函数接口处使用复杂的自定义结构。在VB中调用这种函数时，采用“引入补位成员法”适当修改结构体的定义，就可以有效地避免参数传递上的错误。