Question

VB弹出式菜单跟随鼠标出现

如何让右键弹出的菜单跟随鼠标位置出现

Answer 1

先建立普通菜单，然后用PopupMenu方法显示就行。
比如，建立一个名叫e1的菜单，显示时就用:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Me.PopupMenu e1
End If
End Sub

Answer 2

默认就是跟随鼠标出现的啊！！

设计好菜单后——如果不会的话，你要先学一下，偶也菜，设计好后用：popupmenu 菜单名
当然要在keydown或up事件中使用啊，如：
if button＝2 then popupmenu xxxx

Answer 3

建立一个菜单，顶层菜单设为隐藏，再在mousedow“n中用”popupmenu“＋菜单名来实现