很多的方法可以避免啊，比如保存的时候判断是否有客户名称为空的行
if DataTables("订单").find("客户名称 is null") isnot nothing then
if messagebox.show("是否删除客户名称为空的行"", "提示", MessageBoxButtons.YesNo) = DialogResult.Yes then
DataTables("订单").deletefor("客户名称 is null")
en dif
endif
DataTables("订单").save
如果要追加其它同事录入的客户名称为空的行
DataTables("订单").removefor("客户名称 is null") 移除当前表客户名称为空的行
DataTables("订单").appendload("客户名称 is null")追加当前表客户名称为空的行
dim idx as integer = Tables("订单").findrow("客户名称 is null")
if idx > -1 then
Tables("订单").Position = idx 定位到当前表客户名称为空的行
else
msgbox("没有客户名称为空的行")
en dif
加好友 
发短信
Post By：2022/6/28 20:13:00 [显示全部帖子]
