listview只有click和mousedown这两种方法我现在想实现右键菜单功能,具体就是先选中某一列,然后点击右键出现菜单显示此列可以进行的操作,如删除等.不知该怎么做?盼指点!!也可加qq123567759

解决方案 »

  1.   

    错了是先选中某一hang,然后点击右键出现菜单显示此hang可以进行的操作,如删除等.
      

  2.   

    Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
      
        Dim item As ListItem
        Set item = ListView1.HitTest(x, y)
        If Not item Is Nothing And Button = 2 Then
            PopupMenu aaa
        End If
    end sub 
    点第一列有效
    删除用listview1.ListItems.Remove方法
      

  3.   

    在listview的属性中设置整行选择,然后在mousedown里面
    不过我没明白,listview里面有mouseup事件的阿,在mouseup里面 set item=lv.seleteditem就好了
    在mousedown里面就是下面这个了
        Dim item As ListItem
        Set item = ListView1.HitTest(x, y)
        If Not item Is Nothing And Button = 2 Then
            PopupMenu aaa
        End If
    end sub 
    希望有帮助