标题: 如何做右键弹出菜单? [打印本页] 作者: luhao 时间: 2010-1-11 22:11 标题: 如何做右键弹出菜单? 右键弹出的往往是ACC的功能菜单。我们可不可以自定自己的菜单DropMenu1作者: 咱家是猫 时间: 2010-1-12 09:49
可以,你搜索下,我发过一个菜单制作教程作者: 67613188 时间: 2010-1-13 20:25
可以参照如下的代码(这是我给别人写程序时候用到的其中一段)
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 时间: 2010-1-13 21:55 3#67613188 我试一试作者: trancy1 时间: 2010-4-12 13:07
看不懂.我想要的是禁止所有窗体的右键.作者: 一蓝里山 时间: 2010-4-16 21:49
对我来说难了一点。