方法一:DataColChanging事件
If e.DataCol.Name = "其他补贴" Then
If e.NewValue = 0 Then
msgbox(123456)
e.NewValue = Nothing
End If