选中/取消选中vb.net复选框中的所有项目

选中/取消选中vb.net复选框中的所有项目,.net,windows,vb.net,copy,.net,Windows,Vb.net,Copy,关于复选框的几个问题: 如何检查/取消检查列表中的所有项目 如何复制或删除列表中的所有选中项 虽然可以扫描CheckedItems和CheckedItems属性,但不能同时修改它们。制作集合的副本并处理副本 取消选中所有选中的项目: Dim CheckedIndices(CheckedListBox1.CheckedItems.Count - 1) As Integer CheckedListBox1.CheckedIndices.CopyTo(CheckedIndices, 0) For Ea

关于复选框的几个问题:

  • 如何检查/取消检查列表中的所有项目

  • 如何复制或删除列表中的所有选中项


  • 虽然可以扫描CheckedItems和CheckedItems属性,但不能同时修改它们。制作集合的副本并处理副本

    取消选中所有选中的项目:

    Dim CheckedIndices(CheckedListBox1.CheckedItems.Count - 1) As Integer
    CheckedListBox1.CheckedIndices.CopyTo(CheckedIndices, 0)
    For Each Index As Integer In CheckedIndices
        CheckedListBox1.SetItemChecked(Index, False)
    Next
    
    Dim CheckedItems(CheckedListBox1.CheckedItems.Count - 1) As Object
    CheckedListBox1.CheckedItems.CopyTo(CheckedItems, 0)
    For Each CheckedItem As Object In CheckedItems
        ' Alternateively, add code to copy CheckedItem here.
        CheckedListBox1.Items.Remove(CheckedItem)
    Next
    
    删除所有选中的项目:

    Dim CheckedIndices(CheckedListBox1.CheckedItems.Count - 1) As Integer
    CheckedListBox1.CheckedIndices.CopyTo(CheckedIndices, 0)
    For Each Index As Integer In CheckedIndices
        CheckedListBox1.SetItemChecked(Index, False)
    Next
    
    Dim CheckedItems(CheckedListBox1.CheckedItems.Count - 1) As Object
    CheckedListBox1.CheckedItems.CopyTo(CheckedItems, 0)
    For Each CheckedItem As Object In CheckedItems
        ' Alternateively, add code to copy CheckedItem here.
        CheckedListBox1.Items.Remove(CheckedItem)
    Next
    

    编辑:将数组声明更改为(.Count-1)。VB的声明语法有时会让人恼火。

    我如何才能得到项目的名称,以便在文件路径中使用它?您在列表框中添加了哪些对象?如果每个对象都是字符串,则可以安全地将术语“对象”替换为“字符串”。如果是FileInfo对象,请将“对象”替换为“FileInfo”,然后使用FileInfo的属性。