主题：重置列功能修改

If CurrentTable IsNot Nothing AndAlso CurrentTable.ColSel >= 0 Then

    Dim dc As DataCol = CurrentTable.Cols(CurrentTable.ColSel).DataCol

    dc.RaiseDataColchanged(CurrentTable.filter)

End If

语法

RaiseDataColChanged()

或

RaiseDataColChanged(DataRow)

或

RaiseDataColChanged(Filter)

DataRow：可选参数，单单针对此行触发DataColChanged事件。
Filter:  可选参数，一个条件表达式，针对符合此条件的行触发DataColChanged事件。