很简单啊,新建工程,把工程的属性设为ActiveX Dll就可以了啊

解决方案 »

  1.   

    先看看那个函数是不是__stdcall协议的不过不是那就比较麻烦了
    如果是__stdcall协议协议的,可以这样申明:Private Declare Function GetPhyCode Lib "CBDLL.dll" (ByVal prodcode As String, ByVal hostcode As String, ByVal IsNumber As Long,byval decode as String) As Long
      

  2.   

    按照VB调用DLL的方法去做就行,这方面的资料太多,
    或者看MSDN也可以。
      

  3.   

    zyl910(910:分儿,我又来了!)大哥,我按照你的声明不会报错了。但是我还想问个问题
    那就是我要:prodcode:产品验证码(用TEXT1输入)
    hostcode:硬件编码(TEXT2输入)
    IsNumber:是否产生纯数字激活码(Check1选择)
    decode:产生的激活码(从TEXT3输出)这样怎么做啊?我是个菜鸟啊,大哥帮忙啊。
      

  4.   

    Dim TempStr as StringTempStr=Space(100) '分配空间
    Call GetPhyCode(Text1.Text, Text2.Text, Check1.Value, TempStr)
    Text3.text=TempStr
      

  5.   

    zyl910(910:分儿,我又来了!) ( 磕头感谢.....