ValidateEdit事件
If e.Col.name = "订单数量" Then
If val(e.text) < e.row("已出货数") Then
msgbox("订单数不正确")
e.Cancel = True
End If