vb6.0新手提问，分不够可以加

Question

我这是首次接触vb6.0 
有个.bas文件中的代码 要包成dll文件，以便在.net中 引用，请教大家该如何包？我生成的dll文件 现在无法在.net中引用，报缺少切入点需要打包的代码如下：
Public Declare Sub SETUPdll Lib "REFPROP.DLL" (i As Long, ByVal hfld As String, ByVal hfmix As String, ByVal hrf As String, ierr As Long, ByVal herr As String, ln1 As Long, ln2 As Long, ln3 As Long, ln4 As Long)
Public herr As String * 255, hfmix As String * 255, htyp As String * 3
Public hrf As String * 3
Public htype As String * 3, hmix As String * 3, hcomp As String * 255
Public hfld As String * 10000, hmxnme As String * 255, nc As LongSub Example()
  Dim i As Integer
   nc = 1
  hfld = "nitrogen.fld"  
  
  hfmix = "hmx.bnc"
  hrf = "DEF"
  Call SETUPdll(nc, hfld, hfmix, hrf, ierr, herr, 10000&, 255&, 3&, 255&)
end sub   非常着急 谢谢。

Answer 1

VB好像只能生成ActiveX DLL
在工程新建中新建一个ActiveX DLL把你的代码弄进一个cls文件中。
然后在SUB前加上public编译成DLL就可以以你命名的方式在别的应用中去访问这个sub了

Answer 2

lz我按你说的在.net调用时 报错无法找到Example入口

Answer 3

应该好搞.就是一个自定义的类吗,类中public变量,public的Sub或Function,属性过程都是接口.

Answer 4

需要使用.net框架下自带的工具，问dll生成一个代理类才行。标准com类与.net间有个接口转换

Answer 5

新建一个 VB 工程，包含以上代码；然后用 VB.Net 的自动升级工具进行升级。
直接转成 VB.Net 的代码，根本不需要用 VB6 进行中间封装。

Answer 6

VB好像不能写标准DLL,不知道它写的DLL能不能在.NET里用.UP!

Answer 7

在CLASS里面编译Option Explicit
Private Declare Sub SETUPdll Lib "REFPROP.DLL" (i As Long, ByVal hfld As String, ByVal hfmix As String, ByVal hrf As String, ierr As Long, ByVal herr As String, ln1 As Long, ln2 As Long, ln3 As Long, ln4 As Long)
Public Sub Example()
    Dim herr As String * 255, hfmix As String * 255, htyp As String * 3
    Dim hrf As String * 3
    Dim htype As String * 3, hmix As String * 3, hcomp As String * 255
    Dim hfld As String * 10000, hmxnme As String * 255, nc As Long
    Dim i As Integer
    
    nc = 1
    hfld = "nitrogen.fld"
    hfmix = "hmx.bnc"
    hrf = "DEF"
    Call SETUPdll(nc, hfld, hfmix, hrf, ierr, herr, 10000&, 255&, 3&, 255&)
End Sub

Answer 8

貌似声明在VB6以上的版本里的LONG 应该替换成INTEGER 吧