窗口BeforeClose事件：
dim r as row = tables("xx").Current
dim nms() As string = {"列1","列2","列3","列4"} '必须输入值的列
for each nm as string in nms
if r.isnull(nm) = false then
return
end if
next
r.delete
加好友 
发短信
Post By：2015/4/15 8:41:00 [显示全部帖子]
