ITPub博客

网格部件一次填入多条数据时，有可能会填漏掉某个地方，但有些重要的字段信息又是必须填写的，那么如何做到在保存前判断必填字段是否都填写了内容呢？请看下列代码

dim A = 1
dim dt=网格部件1.DataTable
for each dr in dt.Rows
  if isnull(dr["字段名称"])  then
A = 0
exit for
  end if
next
if A = 0 then
ShowInformation("请将xxxxx填写完整")
else
'提交单元和数据到行
网格部件1.PostEditor()

'提交行数据到DataTable
网格部件1.GridView.UpdateCurrentRow()

'BeginTrans()
'这儿操作数据库。
网格部件1.SaveData()
'判断事务执行结果
if CommitTrans()=false then
showerror(GetTransMessage())
end if
me.Output1 = "Y"
ShowInformation("保存成功")
me.Close()
end if

原文地址：http://bbs.delit.cn/thread-653-1-1.html
转载请注明出处
撰写人:度理科技www.delit.cn

ITPub博客

网格部件判断字段内容不能为空

最新文章