VB.NET中DataGridView非绑定复选框列排序后保持勾选状态问题

折腾两天确实头大，这个问题的核心坑点在于非绑定列的状态默认和行索引绑定，但排序后行的位置会变，索引也就失效了。所以我们得换个思路：用图书的唯一标识（比如ID）来记录勾选状态，而不是依赖行索引。

下面是具体的实现步骤和代码：

1. 先存好勾选的图书ID #

首先在窗体类里声明一个集合，用来记录所有被勾选的图书ID——推荐用HashSet，因为它的增删查效率都很高，还能自动去重：

Private selectedBookIds As New HashSet(Of Integer) ' 假设图书ID是整数类型，根据你的实际情况调整

2. 处理复选框的点击事件 #

当用户点击复选框时，我们要把对应的图书ID加入或移除集合，同时同步到第二个DataGridView：

Private Sub BooksDataGridView_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles BooksDataGridView.CellContentClick
    ' 确认点击的是我们的非绑定复选框列
    If e.ColumnIndex = BooksDataGridView.Columns("CheckBoxColumn").Index AndAlso e.RowIndex >= 0 Then
        Dim targetRow = BooksDataGridView.Rows(e.RowIndex)
        ' 获取当前行的图书唯一ID（替换成你实际的ID列名，比如"BookId"）
        Dim bookId = Convert.ToInt32(targetRow.Cells("BookIdColumn").Value)
        Dim isChecked = CBool(targetRow.Cells("CheckBoxColumn").Value)

        ' 更新集合：勾选就加，取消就删
        If isChecked Then
            selectedBookIds.Add(bookId)
        Else
            selectedBookIds.Remove(bookId)
        End If

        ' 同步到第二个存储勾选行的DataGridView
        UpdateSelectedBooksGrid()
    End If
End Sub

3. 关键：在CellFormatting里恢复勾选状态 #

这一步是解决排序后状态丢失的核心！每当DataGridView渲染单元格（包括排序后重新渲染），我们都根据图书ID从集合里判断是否应该勾选：

Private Sub BooksDataGridView_CellFormatting(sender As Object, e As DataGridViewCellFormattingEventArgs) Handles BooksDataGridView.CellFormatting
    ' 只处理复选框列的渲染
    If e.ColumnIndex = BooksDataGridView.Columns("CheckBoxColumn").Index AndAlso e.RowIndex >= 0 Then
        Dim targetRow = BooksDataGridView.Rows(e.RowIndex)
        ' 跳过新行（如果你的DataGridView允许新增）
        If Not targetRow.IsNewRow Then
            ' 获取当前行的图书ID
            Dim bookId = Convert.ToInt32(targetRow.Cells("BookIdColumn").Value)
            ' 根据集合里的记录设置复选框状态
            e.Value = selectedBookIds.Contains(bookId)
            ' 标记已经完成格式设置，避免系统默认处理覆盖我们的设置
            e.FormattingApplied = True
        End If
    End If
End Sub

4. 同步第二个DataGridView的方法 #

把集合里的ID对应的图书数据提取出来，绑定到第二个DataGridView：

Private Sub UpdateSelectedBooksGrid()
    ' 假设你的原数据源是DataTable（比如叫booksDataTable），如果是实体类List就调整一下查询逻辑
    Dim selectedBooks = booksDataTable.AsEnumerable()
                                      .Where(Function(row) selectedBookIds.Contains(row.Field(Of Integer)("BookId")))
                                      .CopyToDataTable()
    ' 绑定到第二个DataGridView
    SelectedBooksDataGridView.DataSource = selectedBooks
End Sub

注意事项 #

• 一定要确保你的图书数据有唯一标识列（比如BookId），这是整个方案的基础，因为排序后只有ID是不变的。
• 如果你的原数据源是List(Of Book)这类实体集合，查询选中行的时候改成：

  Dim selectedBooks = booksList.Where(Function(book) selectedBookIds.Contains(book.Id)).ToList()
  

• 如果初始化时需要保留之前的勾选状态，记得把对应的ID提前加入selectedBookIds集合。

这样操作后，不管你怎么排序原DataGridView，复选框的状态都会根据图书ID正确恢复，勾选的行也能实时同步到第二个DataGridView里～

内容的提问来源于stack exchange，提问作者John Harry Truman Reyes