如何使用VB制作可以这样展开的菜单效果

如下图:共有5个主菜单,点击每一个主菜单都会展开相应的子菜单[1.2.3.4........]
请赐教，谢谢。。[___主菜单1___]
[___主菜单1___]
[1]  [1]  [1] 
[1]  [1]  [1] 
[1]  [1]      
              
              
               
[___主菜单1___]
[___主菜单1___]
[___主菜单1___]