如何使用VB6.0调用DLL文件

Question

我惠一个初学者，
现在想问一下，
应如何在VB中调用DLL和OCX文件

Answer 1

标准DLL:　
　　　先声明 
　　　声明的方法：Declare Function 函数名 Lib "DLL名" (参数说明)函数返回值
　　　然后就可以象调用VB内置函数那样调用了。AcitveX DLL
　　　菜单中选　
     工程　－＞　引用     选择你要用的DLLOcx 
     菜单中
     工程　－＞部件      选择你要用的控件

Answer 2

标准DLL:
象这样
Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
参考：
http://www.csdn.net/develop/article/16/16529.shtm

Answer 3

我的一个程序调用供你参考：
    调用的是pc1216k.dll,功能是从A/D转换板上读取数据'△△△A/D转换板驱动１△△△
Public Declare Function AD_SE_1216K Lib _
        "D:\个人资料\SolarLv\毕业设计\pc1216k.dll" (ByVal Address As Long, _
        ByVal Delay As Integer, ByVal ChNo As Integer) As Integer
        
'△△△A/D转换板驱动２△△△
Public Declare Function AD_BLOCK_SE_1216K Lib _
        "D:\个人资料\SolarLv\毕业设计\pc1216k.dll" (ByVal Address As Long, _
        ByVal Delay As Integer, Bp As ADBuf) As Boolean

Answer 4

我的一个程序调用供你参考：
    调用的是pc1216k.dll,功能是从A/D转换板上读取数据
    1.在模块中声明:
Public Declare Function AD_SE_1216K Lib _
        "D:\个人资料\SolarLv\毕业设计\pc1216k.dll" (ByVal Address As Long, _
        ByVal Delay As Integer, ByVal ChNo As Integer) As Integer
    2.调用：
    a=ad_se_1216k(address,delay,no)

Answer 5

怎么我在调用时会弹出提示框：
控件加载错误！
我用的是WIN2000系统。