这里介绍让ContextMenuStrip 弹出在需要的位置,在vb2008 中 textbox有自己的默认右键菜单,要自定义右键菜单可以先把Textbox的ShortcutsEnabled设为false,再在textbox的MouseUp事件中加下如下代码:
ASP/Visual Basic Code复制内容到剪贴板
- If e.Button = Windows.Forms.MouseButtons.Right Then
- Dim x As Integer
- Dim y As Integer
- x = e.Location.X + 235 ’按需要设置
- y = e.Location.Y + 10 ’按需要设置
- Dim xy As New Point(x, y)
- cmsUrl.Show(Me, xy) 'cmsUrl是ContestMenuStrip的一个实例
- End If