VB 为无标题栏窗体添加菜单.rar

VB为无标题栏窗体添加菜单,为无标题栏窗体添加菜单，添加了一种弹出式菜单，窗口美化的挺漂亮，如示例截图所示，源码运行于VB6.0环境。相关代码：　　SelectCaseIndex　　Case0'添加菜单　　PopupMenuFrm_menu.Add,,Picture1(0).Left,Picture1(0).TopPicture1(0).Height10　　Case1'删除菜单　　PopupMenuFrm_menu.Del,,Picture1(1).Left,Picture1(1).TopPicture1(1).Height10　　Case2