VB下调用dll的函数必须要有特殊的声明,用Declare声明语句在窗体级或模块级或全局模块的代码声明段进行声明,将动态链接库中的函数声明到VB中,供VB程序调用。
语句格式为:Declare Sub 过程名Lib [ Alias " 别名]([ByVal 参数AS类型]),或为Declare Function函数名Lib [Alias " 别名]([ByVal 参数AS类型])AS类型在声明中首先用Declare关键字表示声明DLL中的函数。在C语言中有的函数类型为VOID,它表示不具有返回值,则必须用关键字Sub将其声明成过程。有的函数具有返回值,则必须用关键字Function将其声明成函数,并且在声明语句的最后要用AS关键字指明函数返回值的类型
把待测试的dll中的变量,函数,在vb中,重新声明。举例如下:
例如,Public Enum VideoSize
SIZEFULLPAL = 0
SIZED1
SIZEVGA
SIZEQVGA
SIZESUBQVGA
End Enum
例如,Public Declare Function x Lib "xx.dll" () As Long。X为待测试的函数名,xx为待测试的dll名称。就可以使用了。
如果在主窗口中,有时因为按钮太多,为了美观起见,可以通过在project/form中,add新的form的方式,创建新的form。在主窗口中,添加一个按钮,双击按钮,