vb如何模拟鼠标右键点击弹出xp菜单

  我想要的是这样的，用鼠标左键点击一下我的一个按钮，再用鼠标左键点击文件夹或者是文件或者是磁盘，然后就像是用鼠标右键直接点击在了文件（文件）上面一样，弹出菜单，包括打开，复制，剪贴，删除之类的
  如果有代码更好。谢谢

---

同求代码

---

编辑好菜单后将菜单的“可见”去掉勾
在窗体代码的鼠标右键代码中添加
窗体.mpopupmenu  菜单名
就会显示弹出菜单

---

使用右键菜单的例子

---

"用鼠标左键点击一下我的一个按钮，再用鼠标左键点击文件夹或者是文件或者是磁盘"
有这么简单么?
有这么简单我早抢了

引用

编辑好菜单后将菜单的“可见”去掉勾
在窗体代码的鼠标右键代码中添加
窗体.mpopupmenu  菜单名
就会显示弹出菜单

---

  不是，这个菜单不是我的程序里的菜单，菜单内容是 像鼠标右键点击文件夹，文件，磁盘弹出的菜单一样，这个菜单的内容有不确定性，而且点了菜单也不需要我编写代码，菜单都是xp自带的。

---

他是要替换掉Windows系统菜单吧

---

那就是调出系统菜单

引用

  不是，这个菜单不是我的程序里的菜单，菜单内容是 像鼠标右键点击文件夹，文件，磁盘弹出的菜单一样，这个菜单的内容有不确定性，而且点了菜单也不需要我编写代码，菜单都是xp自带的。

---

引用

他是要替换掉Windows系统菜单吧

  不是，我们有个机器是触摸屏的，没有鼠标和键盘，我想用程序代替鼠标右键的单击事件，不替换菜单，只是像用鼠标点击