用变量记录一下不就行了？
vars("sender") = e.Sender
ContextMenus("快捷菜单名").Show(e.Sender,e.x,e.y) '则在鼠标位置显示快捷菜单
然后在菜单里直接用 vars("sender") 即可
加好友 
发短信
Post By：2015/12/13 13:07:00 [显示全部帖子]
