Rais evenet و add handler در dll

[mmbguide]

با تغییر زیر جواب گرفتم

    Sub CheckAlertID(ByVal ID As Long) Handles a._AlertClick

        MsgBox(ID)

    End Sub