关于checkedlistbox1的选取，全选，全取消

[hpamweeq53]

如何用代码将checkedlistbox中的全部打勾，和部分打勾，和全部取消

[huangjie616124]

Dim i As Integer = 0
For i = 0 To ds.Tables(0).Rows.Count - 1
Me.CheckedListBox1.Items.Add(ds.Tables(0).Rows(i)("userName"), True)
Next

[huangjie616124]

Dim i As Integer = 0
For i = 0 To ds.Tables(0).Rows.Count - 1
Me.CheckedListBox1.Items.Add(ds.Tables(0).Rows(i)("userName"), false)
Next

取消