[attach]31117[/attach]
在树中点右键,弹出
[attach]31118[/attach]
模块"窗体1"中有一段代码:
Private Sub TreeView0_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Long, ByVal y As Long)
If Button = 2 Then
CommandBars("右键").ShowPopup
End If
End Sub
可俺没查到相应"右键"的代码,这个功能是怎么实现的.