Creating a Menu Command with Visual Basic .Net

Dear Sir,

     i'd tried below menu command coding but not show toolbarImage

Public Sub GetAddInInfo(ByRef poInfo As EdmLib.EdmAddInInfo, ByVal poVault As EdmLib.IEdmVault5, ByVal poCmdMgr As   EdmLib.IEdmCmdMgr5) Implements EdmLib.IEdmAddIn5.GetAddInInfo

poInfo.mbsAddInName = "Menu command sample"
poInfo.mbsCompany = "SolidWorks Corporation"
poInfo.mbsDescription = "Adds menu items and toolbar buttons"
poInfo.mlAddInVersion = 1
poInfo.mlRequiredVersionMajor = 12
poInfo.mlRequiredVersionMinor = 2

iNormalBmp = My.Resources.Resource1.ToolbarNormal.GetHbitmap.ToInt32
iHotBmp = My.Resources.Resource1.ToolbarHot.GetHbitmap.ToInt32
 
poCmdMgr.AddToolbarImage(iHotBmp, 2, EdmButtonState.BState_Hot, False, True, &HC0C0C0, 99)

poCmdMgr.AddCmd(1000, "First command", EdmMenuFlags.EdmMenu_HasToolbarButton, "This is the first command", "First command", 0, 99)

poCmdMgr.AddCmd(1001, "Second command", EdmMenuFlags.EdmMenu_HasToolbarButton Or EdmMenuFlags.EdmMenu_MustHaveSelection, "This is the second command", "Second command", 1, 99)

End Sub

Public Sub OnCmd(ByRef poCmd As EdmLib.EdmCmd, ByRef ppoData As System.Array) Implements EdmLib.IEdmAddIn5.OnCmd

         Dim frm As New Form1

          frm.Show()

End Sub


SolidworksSolidworks Pdm enterprise Pdm