关于上下文菜单的问题,请高手指教!
在窗体上添加一treeview和一contextmenu控件,然后在treeview控件的mousedown事件中添加如下代码:
if e.button=mousebuttons.right then
dim mousepoint as point
mousepoint=treeview1.mouseposition
treeview1.contextmenu=contextmenu1
contextmenu1.show(treeview1,mousepoint)
end if
但结果是contextmenu并不是每次都出现在鼠标的位置,基本上两次有一次正确,但treeview1添nodes后
结果有所改观,但还不完全正确,为什么?请高手指教?