Topic: ContextMenuStrip1控件定位问题 |
Print this page |
1.ContextMenuStrip1控件定位问题 | Copy to clipboard |
Posted by: crazyhsp Posted on: 2008-09-18 20:59 最近老师叫我们做一个任务管理器,我界面用VB2008画好了,在 listview中的进程也填充进去了,但是单击鼠标右键出现的小菜单不能固定在我点击的选项上,而是到处点击都会出现,这虽然是VB做的,我找了很多论坛资料都没有找到能解决问题的,所以我就在这里问问大家了。我把事件代码拷贝一下,看一下哪里有错误。 Private Sub ListView2_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView2.MouseClick ' For Each myitem As ListViewItem In Me.ListView2.SelectedItems 'Dim str As String = myitem.Text() ' Exit For ' Next ' Dim w As Integer = ColumnHeader3.Width ' Dim point1 As Point = MousePosition ListView2.ContextMenuStrip = ContextMenuStrip1 If (e.Button = Windows.Forms.MouseButtons.Right And Me.ListView2.SelectedItems.Count = 1) Then ' If (w - point1.X > 0) Then ' If (count > 0) Then ContextMenuStrip1.Show(MousePosition) 'End If 'End If End If End Sub |
2.Re:ContextMenuStrip1控件定位问题 [Re: crazyhsp] | Copy to clipboard |
Posted by: crazyhsp Posted on: 2008-09-18 22:41 我找出一点错误 但是还是不能正常显示在点击位置 Private Sub ListView2_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView2.MouseClick If (e.Button = Windows.Forms.MouseButtons.Right) Then ContextMenuStrip1.Show(ListView2, MousePosition) End If End Sub |
3.Re:ContextMenuStrip1控件定位问题 [Re: crazyhsp] | Copy to clipboard |
Posted by: JiafanZhou Posted on: 2008-09-18 23:45 Is $MousePosition an internal variable defined by Visual basic?? You can print it onto the standard system output or a trace log file to debug the code. Jiafan |
4.Re:ContextMenuStrip1控件定位问题 [Re: crazyhsp] | Copy to clipboard |
Posted by: crazyhsp Posted on: 2008-09-20 21:40 谢谢大家了 搞了两天 终于被我弄出来了 我是从我们的JAVA控件里看到的方法哦。 Private Sub ListView2_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView2.MouseClick If (e.Button = Windows.Forms.MouseButtons.Right) Then ContextMenuStrip1.Show(ListView2, e.X, e.Y) End If End Sub |
Powered by Jute Powerful Forum® Version Jute 1.5.6 Ent Copyright © 2002-2021 Cjsdn Team. All Righits Reserved. 闽ICP备05005120号-1 客服电话 18559299278 客服信箱 714923@qq.com 客服QQ 714923 |