can we make twinbasic ide addin(not for vb6 ide addin)
Code:Public FormDisplayed As Boolean Public VBInstance As VBIDE.VBE Dim mcbMenuCommandBar As Office.CommandBarControl Dim mfrmAddIn As New frmAddIn Public WithEvents MenuHandler As CommandBarEvents '命令栏事件句柄 Sub Hide() On Error Resume Next FormDisplayed = False mfrmAddIn.Hide End Sub Sub Show() On Error Resume Next If mfrmAddIn Is Nothing Then Set mfrmAddIn = New frmAddIn End If Set mfrmAddIn.VBInstance = VBInstance Set mfrmAddIn.Connect = Me FormDisplayed = True mfrmAddIn.Show End Sub




Reply With Quote