主题：关于DataColChanging代码事件

If e.DataCol.Name = "交货数量" Then
    If e.DataRow("未交货数量") - e.NewValue  < 0 Then
        msgbox("出货数量大于订单数量,请注意核实")
        e.cancel=True

        Return
    End If
   
    If e.DataRow("库存数量") - e.NewValue  < 0 Then
        msgbox("出货数量大于库存数量,请修改出库数量或先完成入库操作")
        e.cancel=True
        Return
    End If   
End If