VB.NET中如何实现CheckBox点击后刷新与DataGridView的绑定？

本文共计416个文字，预计阅读时间需要2分钟。

目标+我需要一种方法通过单击绑定到DataGridView中的CheckBox将项目设置为已完成。完成后，由于DataView的行过滤器，不再从DataGridView中看到该行。说明+我有一个绑定到DataView的DataGridView+Privat

目标

我需要一种方法通过单击绑定的DataGridView中的CheckBox将项目设置为已完成.完成后,由于DataView的行过滤器,不再从DataGridView中看到该项.

说明

我有一个绑定到DataView的DataGridView.

Private Sub LoadLispImprovements() Private ViewLispImprovements As New DataView ViewLispImprovements.Table = Programs.Tables("dtLispImprovements") ViewLispImprovements.RowFilter = "Completed=0" Lisp_dgvImprovements.DataSource = ViewLispImprovements End Sub

此DataView的表设置为以下DataTable：

此DataTable的主键设置为正确的字段.完成字段有一个红色方块,只是为了向您展示我将其设置为布尔值.

看看我的DataGridView：

这是我点击复选框的地方,该项目应该被过滤掉(因为没有勾选ShowAll复选框)

问题

当我单击CheckBox时,该项目保留在DataGridView中.为了将其过滤掉,我必须选择另一行.看一看：

当我改变行时,它最终会消失：

在选中完成的复选框后,如何让它立即删除？

P.S：是的我有CurrentCellDirtyStateChanged事件处理程序.

Private Sub Lisp_dgvImprovements_CurrentCellDirtyStateChanged(sender As Object, e As System.EventArgs) Handles Lisp_dgvImprovements.CurrentCellDirtyStateChanged If Lisp_dgvImprovements.IsCurrentCellDirty Then Lisp_dgvImprovements.CommitEdit(DataGridViewDataErrorContexts.Commit) End If End Sub 您可以通过在更改单元格的值时结束DataRow的编辑来实现此目的.

Private Sub Lisp_dgvImprovements_CurrentCellDirtyStateChanged(sender As Object, e As System.EventArgs) Handles Lisp_dgvImprovements.CurrentCellDirtyStateChanged If (Me.Lisp_dgvImprovements.IsCurrentCellDirty) Then Me.Lisp_dgvImprovements.CommitEdit(DataGridViewDataErrorContexts.Commit) End If End Sub Private Sub Lisp_dgvImprovements_CellValueChanged(sender As System.Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Lisp_dgvImprovements.CellValueChanged ' |-- The index of boolean DataGridViewColumn If ((e.ColumnIndex = 0) AndAlso (e.RowIndex > -1)) Then With Me.Lisp_dgvImprovements.Rows(e.RowIndex) If (Not .IsNewRow) Then With DirectCast(.DataBoundItem, DataRowView).Row ' |-- The index of boolean DataColumn .Item(0) = True .EndEdit() End With End If End With End If End Sub