VB6制作可伸缩展开的菜单，伸缩菜单，单击菜单最下边的小箭头，隐藏的菜单会伸展显示出来，这种菜单大家在平时也是遇到过的，现在Windows系统中也有这种菜单，不用的时候隐藏，用户单击后智能跑到上边，今天用VB模拟了这种菜单效果，源代码编译运行于VB6.0，运行截图如下。