如何做右键弹出菜单？

luhao

右键弹出的往往是ACC的功能菜单。我们可不可以自定自己的菜单DropMenu1

咱家是猫

可以,你搜索下,我发过一个菜单制作教程

67613188

可以参照如下的代码（这是我给别人写程序时候用到的其中一段）
Private Sub ListView_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Long, ByVal y As Long)
    Set ListView.SelectedItem = ListView.HitTest(x, y)
    If Button = 2 Then
        '在屏幕的指定位置弹出快捷菜单（若不指定则在鼠标处）
        If ListView.HitTest(x, y) Is Nothing Then
            CommandBars("Pmn").ShowPopup 'Pmn为快捷菜单的名称
        Else
            CommandBars("Icon").ShowPopup 'Icon为快捷菜单的名称
        End If
    End If
End Sub
看不懂就在相互问一下吗。

luhao

3# 67613188 我试一试

trancy1

看不懂.我想要的是禁止所有窗体的右键.

一蓝里山

对我来说难了一点。