[求助]自定义工具条不能激发事情的问题

<P>我在VB.net中实现了自定义工具条对话框却不能激发相应地事件啊，不知道是什么原因，有没有帮忙看看啊?</P>
<P> Private WithEvents m_pCustomizeDialogEvents As CustomizeDialog<BR>    Private pCustDialog As ICustomizeDialog = New CustomizeDialog()</P>
<P>    Private Sub pCustDialogEvents_OnStartDialog()<BR>        Me.AxToolbarControl2.Customize = True<BR>        MsgBox("start customdialog")</P>
<P>    End Sub</P>
<P>    Private Sub pCustDialogEvents_OnCloseDialog()<BR>        Me.AxToolbarControl2.Customize = False</P>
<P>    End Sub</P>
<P>Private Sub CreateCustomizeDialog(ByVal toolbarControl As IToolbarControl)</P>
<P>        'Create new customize dialog </P>
<P>        'pCustDialog = New ESRI.ArcGIS.Controls.CustomizeDialogClass()<BR>        'pCustDialog = New CustomizeDialog()</P>
<P><BR>        m_pCustomizeDialogEvents = pCustDialog</P>
<P>        pCustDialog.DialogTitle = "配置工具条"<BR>        pCustDialog.ShowAddFromFile = True</P>
<P>        pCustDialog.SetDoubleClickDestination(toolbarControl)<BR>        pCustDialog.StartDialog(Me.AxMapControl1.hWnd)</P>
<P>    End Sub</P>
<P>自定义对话框可以打开，但由于工具条不能自定义Me.AxToolbarControl2.Customize = False，故不能加入新的工具。</P>