如何在鼠标单击的位置弹出上下文菜单？我写了，但是定位总是不准确！有兴趣的近来看看，说上两句，全当聊聊天！

[baqiao1211]

ToolBar1_ButtonClick中写有如下代码：
................................
Pos = Me.ToolBar1.MousePosition
Menu.Show(Me.ToolBar1, Pos)
为什么我的menu不能够在ButtonClick的地方show出来？
总是在其他地方show出来，真真的奇怪！

[MacrossYF29]

你分成两个变量X。Y看看行吗？
可能是POS的事。POS是不是关键字呀？

[szch]

用mouseclick事件,
Menu.Show(Me.ToolBar1, new point(e.x,e.y))

[Angelnet]

‘popup为定义菜单
popup.TrackPopup(Me.ToolBar1.PointToScreen(New Point(e.X, e.Y)))

[lbx1979]

坐标没找对吧

[baqiao1211]

用mouseclick事件,
Menu.Show(Me.ToolBar1, new point(e.x,e.y))
---------------------------------------------
我怎么找不到toolbar的mouseclick事件？有这个事件吗？

[baqiao1211]

我在ToolBar1_ButtonClick中写中写了
Menu.Show(Me.ToolBar1, new point(e.x,e.y))，但是写到e时，后面没有跟出x或y的智能提示？为什么？为什么e没有提供对x,y的接口？

[ganenpingsohucom]

转换为客户区坐标试试
Pos = Me.ToolBar1.MousePosition
Menu.Show(Me.ToolBar1,toolbar.pointtoclient(pos))

[Angelnet]

写到mouseup

[ganenpingsohucom]

转换为客户区坐标试试
Pos = Me.ToolBar1.MousePosition
Menu.Show(Me.ToolBar1, toolbar1.pointtoclient(Pos))