在VB中调用动态连接库
Bug，降低软件的可靠性。下面将参数类型分为简单数据类型、字符串、和用户自定义类型三种分别进行讨论。
(1)、简单数据类型：
简单数据类型是指Numeric数据类型（包括Integer、Long、Single、Double、Currency类型）、Byte数据类型和Boolean数据类型。它们的共同的特点是结构简单，操作系统在处理时不必进行特殊的转换。
简单数据类型参数的传递比较简单。我们知道，在VB中传递参数的方式有两种：传值（Byval） 和传址（ByRef），缺省的方式是传址。所谓传值，就是对一个变量的具体值进行传递;而传址则 是传递变量的地址。例如，在VB程序中需要将一个整型变量m=10的值传进动态库，如果用传值 方式，那么传进动态库的值就是10，而在传址方式下，传入的则是变量m的地址，相当于C/C++ 中&m的值。需要注意的是，以传值方式传进动态连接库的变量，其值在动态库中是不能 被改变的;如果需要在动态连接库中修改传入参数的值，则必须使用传址方式。一般来说，在VB 和动态连接库之间传递单个的简单数据类型，只要注意了以上几个方面就可以了。当需要将 一个简单数据类型的整个数组传进动态库时，必须将相应参数声明为传址方式，然后把数组 的第一个元素作为参数传入，这样在动态连接库中就得到了数组的首地址，从而可以对整个 数组进行访问。例如，声明了一个名为ReadArray的DLL过程，要求传入一个整型数组aArray：
Declare Function ReadArray Lib "mydll.dll" _
(aArray As Integer) As Integer
在调用时可以采用如下方式：
Dim ret,I(5) as Integer
… …
ret = ReadArray(I(0)) ''
将整个数组传入动态连接库
(2)、字符串参数的传递：
与简单数据类型相比，字符串类型（String、String*n）的参数传递要复杂得多，这主要是Windows 95 API和VB使用的字符串类型不同的缘故。VB使用被称为BSTR的String数据类型，它是由自动化（以前被称为OLE Automation）定义的数据类型。一个BSTR由头部和字符串组成，头部包含了字符串的长度信息，字符串中可以包含嵌入的null值。大部分的BSTR是 Unicode的，即每个字符需要两个字节。BSTR通常以两字节的两个null字符结束。下图表示 了一个BSTR类型的字符串。
（前缀）aTest\0
头部BSTR指向数据的第一个字节
另一方面，大部分的DLL过程（包括Windows 95 API中的所有过程）使用LPSTR类型字符串，这是指向标准的以null结束的C语言字符串的指针，它也被称为ASCIIZ字符串。LPSTR 没有前缀。下图显示了一个指向ASCIIZ字符串的LPSTR。
aTest\0
LPSTR指向一个以null结尾的字符串数据的第一个字节
如果DLL过程需要一个LPSTR（指向以null结束的字符串的指针）作为参数，可以在VB 中将一个字符串以传值的方式传递给它。因为指向BSTR的指针实际指向以null值结束的字符串的第一个数据字节，所以对于DLL过程来说，它就是一个LPSTR。这样传入动态连接库的字符串，DLL过程也可以对它进行修改，尽管它是以传值方式传入的。只有当DLL过程需要一个指向LPSTR的指针时，才以传址的方式传入字符串，这时DLL过程得到的是一个指向字符串指针的指针（相当于C/C++中的char**），而不是通常所用的字符串的首地址（相当于C/C++中的char*）。
当需要把一个字符串数组整个传入动态连接库时，情况就变得复杂多了，用传递简单数据类型数组的方式来传递字符串数组是行不通的。当我们以传值的方式将一个字符串数组的第一个元素传进动态连接库时，DLL过程得到的实际上是该元素压入堆栈段后的地址，而不是数据段中整个数组的首地址。也就是说，这时DLL过程只能得到数组的第一个元素，而无法访问整个数组。而以传址方式传入第一个元素时，DLL过程只能得到指向该元素在堆栈段中地址的指针，同样无法访
(1)、简单数据类型：
简单数据类型是指Numeric数据类型（包括Integer、Long、Single、Double、Currency类型）、Byte数据类型和Boolean数据类型。它们的共同的特点是结构简单，操作系统在处理时不必进行特殊的转换。
简单数据类型参数的传递比较简单。我们知道，在VB中传递参数的方式有两种：传值（Byval） 和传址（ByRef），缺省的方式是传址。所谓传值，就是对一个变量的具体值进行传递;而传址则 是传递变量的地址。例如，在VB程序中需要将一个整型变量m=10的值传进动态库，如果用传值 方式，那么传进动态库的值就是10，而在传址方式下，传入的则是变量m的地址，相当于C/C++ 中&m的值。需要注意的是，以传值方式传进动态连接库的变量，其值在动态库中是不能 被改变的;如果需要在动态连接库中修改传入参数的值，则必须使用传址方式。一般来说，在VB 和动态连接库之间传递单个的简单数据类型，只要注意了以上几个方面就可以了。当需要将 一个简单数据类型的整个数组传进动态库时，必须将相应参数声明为传址方式，然后把数组 的第一个元素作为参数传入，这样在动态连接库中就得到了数组的首地址，从而可以对整个 数组进行访问。例如，声明了一个名为ReadArray的DLL过程，要求传入一个整型数组aArray：
Declare Function ReadArray Lib "mydll.dll" _
(aArray As Integer) As Integer
在调用时可以采用如下方式：
Dim ret,I(5) as Integer
… …
ret = ReadArray(I(0)) ''
将整个数组传入动态连接库
(2)、字符串参数的传递：
与简单数据类型相比，字符串类型（String、String*n）的参数传递要复杂得多，这主要是Windows 95 API和VB使用的字符串类型不同的缘故。VB使用被称为BSTR的String数据类型，它是由自动化（以前被称为OLE Automation）定义的数据类型。一个BSTR由头部和字符串组成，头部包含了字符串的长度信息，字符串中可以包含嵌入的null值。大部分的BSTR是 Unicode的，即每个字符需要两个字节。BSTR通常以两字节的两个null字符结束。下图表示 了一个BSTR类型的字符串。
（前缀）aTest\0
头部BSTR指向数据的第一个字节
另一方面，大部分的DLL过程（包括Windows 95 API中的所有过程）使用LPSTR类型字符串，这是指向标准的以null结束的C语言字符串的指针，它也被称为ASCIIZ字符串。LPSTR 没有前缀。下图显示了一个指向ASCIIZ字符串的LPSTR。
aTest\0
LPSTR指向一个以null结尾的字符串数据的第一个字节
如果DLL过程需要一个LPSTR（指向以null结束的字符串的指针）作为参数，可以在VB 中将一个字符串以传值的方式传递给它。因为指向BSTR的指针实际指向以null值结束的字符串的第一个数据字节，所以对于DLL过程来说，它就是一个LPSTR。这样传入动态连接库的字符串，DLL过程也可以对它进行修改，尽管它是以传值方式传入的。只有当DLL过程需要一个指向LPSTR的指针时，才以传址的方式传入字符串，这时DLL过程得到的是一个指向字符串指针的指针（相当于C/C++中的char**），而不是通常所用的字符串的首地址（相当于C/C++中的char*）。
当需要把一个字符串数组整个传入动态连接库时，情况就变得复杂多了，用传递简单数据类型数组的方式来传递字符串数组是行不通的。当我们以传值的方式将一个字符串数组的第一个元素传进动态连接库时，DLL过程得到的实际上是该元素压入堆栈段后的地址，而不是数据段中整个数组的首地址。也就是说，这时DLL过程只能得到数组的第一个元素，而无法访问整个数组。而以传址方式传入第一个元素时，DLL过程只能得到指向该元素在堆栈段中地址的指针，同样无法访