If CurrentTable IsNot Nothing AndAlso CurrentTable.ColSel >= 0 Then Dim dc As DataCol = CurrentTable.Cols(CurrentTable.ColSel).DataCol dc.AllowEdit = Not dc.AllowEditEnd If
没有锁定列的效果?