请教:在VB中如何添加COM组件的事件???急...

Question

我通过“工程-->引用”的方法将一个用vc编写的com组件(dll文件）引入到了项目里面，但是不知道在项目里面怎样引用该com组件的事件？请各位大虾指教...急......

Answer 1

以Ado连接对象为例
Option Explicit
Dim WithEvents cn As ADODB.Connection
Private Sub cn_ConnectComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)
    MsgBox "good"
End Sub
Private Sub Form_Load()
    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;data source=d:\test.mdb;"
End Sub