'Usage
Dim instance As IDTExtensibility2
Dim Application As Object
Dim ConnectMode As ext_ConnectMode
Dim AddInInst As Object
Dim custom As Array
instance.OnConnection(Application, ConnectMode, _
AddInInst, custom)
'Declaration
Sub OnConnection ( _
Application As Object, _
ConnectMode As ext_ConnectMode, _
AddInInst As Object, _
ByRef custom As Array _
)