dataColChanged事件
If e.DataCol.IsNumeric AndAlso e.DataRow(e.datacol.name) = 0 Then
e.DataRow(e.datacol.name) = Nothing
End If