Select Case e.Col.Name
Case "产品名称"
if e.Row.IsNull("订单号") = True then
e.Cancel = True end if
Case "订购件数"
if e.Row.IsNull("产品名称") = True then
Case "到货日期"
if e.Row.IsNull("订购件数") = True then
end select