当listview控件有checkbox时，如何用sendmessage进行“全选”呀！请高手指教！在线等！

Question

我用的是：
For i = 0 To (ListView1.ListItems.count - 1)
        Call SendMessage(ListView1.hwnd, LVM_SETITEMSTATE, ByVal i, LVIS_STATEIMAGEMASK)
    Next i
可是怎么不好使啊？！请高手帮帮我吧！

Answer 1

Private Sub selectAllCheck_Click()
    If selectAllCheck.Value = vbChecked Then
        For i = 1 To ListView1.ListItems.Count
            ListView1.ListItems(i).Checked = True
        Next
    Else
        For i = 1 To ListView1.ListItems.Count
            ListView1.ListItems(i).Checked = False
        Next
    End If
    
End Sub没用api……

Answer 2

这个没有必要用API吧For i = 0 To (ListView1.ListItems.count - 1)
        ListView1.ListItems(i).Checked = True
next

Answer 3

同意楼上的，就简单的把checked属性赋为true就行了，全部都不选的赋为false就行

Answer 4

http://vbnet.mvps.org/index.html?code/comctl/lvcheckboxmeth.htm

Answer 5

楼主要的一家是API吗？楼上的不是也可以吗？ 为什么要用API，多此一举嘛

Answer 6

舍近求远了，先考虑控件自带的方法在考虑api吧

Answer 7

//楼主要的一家是API吗？楼上的不是也可以吗？ 为什么要用API，多此一举嘛//舍近求远了，先考虑控件自带的方法在考虑api吧楼主可能是要练习api的使用，也可能是基于速度的考虑

Answer 8

是啊，自带的太慢了。现在这个问题我已经解决了。用API，呵呵。