vb6代码转换为vb。net有关问题

vb6代码转换为vb。net问题？
vb6代码：
Private   Declare   Function   SMSDeliver_ReportCallBack   Lib   "third_gw "   (ByVal   Deliver_Report   As   Long)   As   Long

Private   Sub   Command2_Click()
        SMSDeliver_ReportCallBack   AddressOf   Deliver2
End   Sub

Public   Sub   Deliver2(ByRef   re_type   As   Long)
......
End   Sub

转换为。net后提示要用“委托”，怎么实现？

------解决方案--------------------
不懂vb6，帮顶
------解决方案--------------------
Private Declare Function SMSDeliver_ReportCallBack Lib "third_gw " ( _
ByVal lpfn As PROC) As Integer
Public Delegate Function PROC(ByRef re_type As Integer) As Integer
Public gobjDelegate As PROC=New PROC(AddressOf Deliver2)
Public Sub Deliver2(ByRef re_type As Integer)
......
End Sub
Private Sub Command2_Click()
SMSDeliver_ReportCallBack(gobjDelegate)
End Sub