用TreeView控件，具体方法我不记得了，你可以参照明日科技有限公司的VB1200例第一卷，里面有实例。注：这是树桩列表，不是什么折叠菜单
网站建设哪家好，找创新互联建站！专注于网页设计、网站建设、微信开发、小程序定制开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了双河免费建站欢迎大家使用！
NotifyIcon1属性中ContextMenustrip=ContextMenuStrip1
在NotifyIcon1的属性中修改就可以了，好像可以去掉以下内容，用鼠标右键点击图标就可以了
Private Sub NotifyIcon1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseClick
ContextMenuStrip1.Visible = True
End Sub
可以做一个窗体，该窗体中放入你需要的菜单。
这个窗体几个特殊设置：
1。TOPmost设置为TRUE
2。Formborderstyle设置为none
3。showintaskbar设置为False
4。size设置为你的菜单大小
用的时候new一下就有啦！
这样就相当于悬浮窗体了，细节自己研究吧！^_^
