如何禁止重置某个数据列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

都已经重置了，再判断有啥用啊

重置的代码放到最后

'不允许对某个数据表的某个数据列进行重置

If CurrentTable.name = "JP944任务单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "piao号" Then Return

If CurrentTable.name = "JPK612任务单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "装配piao号" Then Return

If CurrentTable.name = "工位912" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "piao号" Then Return

If CurrentTable.name = "接头巴任务单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "装配piao号" Then Return

If CurrentTable.name = "弯头开料单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "生产piao号" Then Return

If CurrentTable.name = "直身开料单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "生产piao号" Then Return

If CurrentTable.name = "珠江弯头开料单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "生产piao号" Then Return

If CurrentTable.name = "珠江直身开料单" AndAlso CurrentTable.cols(CurrentTable.colsel).name = "生产piao号" Then Return

'此代码针对筛选出的数据行进行重置 2020/6/20增加

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

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

dc.RaiseDataColchanged(CurrentTable.filter)

End If

主题：如何禁止重置某个数据列