1.
比你想的复杂多了
自己用窗体去模拟菜单
这方面的代码都是>=300KB的,而且效果都不够好
2.
看FAQ:http://www.csdn.net/Expert/FAQ/FAQ_Index.asp?id=197
注意用PopupMenu方法弹出菜单3.
For I=0 to List1.ListCount-1
    If List1.Selected(I) Then List2.AddItem List1.List(I)
Next I4.
自己用绘图语句去画!5.
这是MicroSoft未公开的控件
你想要实现类似的效果只有自己写控件6.
自己写控件!