1.请问如何将下面这段VB语句转成DELPHI的
2.VB中创建一个Active DLL,在DELPHI如何实现
(下面程序段是要实现一个DLL)'定义 BillEvent 接口. 必须具有的声明, 以此来获得事件
Private WithEvents m_BillInterface  As BillEvent
 
Public Sub Show(ByVal oBillInterface As Object)
 
    'BillEvent 接口实现
    '注意: 此方法必须存在, 请勿修改
    Set m_BillInterface = oBillInterface
 
End SubPrivate Sub Class_Terminate()
 
    '释放接口对象
    '注意: 此方法必须存在, 请勿修改
    Set m_BillInterface = NothingEnd SubPrivate Sub m_BillInterface_AfterNewBill()
 
    'TODO: 请在此处添加代码响应事件 AfterNewBill
 End Sub