度量快速开发平台-专业、快速的软件定制快开平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 部件 流程 SQL
查看: 4538|回复: 9
打印 上一主题 下一主题

[分享] 网格部件判断字段内容不能为空

[复制链接]

542

主题

5916

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
跳转到指定楼层
楼主
发表于 2020-6-25 14:09:47 | 显示全部楼层 回帖奖励 |倒序浏览 |阅读模式
网格部件一次填入多条数据时,有可能会填漏掉某个地方,但有些重要的字段信息又是必须填写的,那么如何做到在保存前判断必填字段是否都填写了内容呢?请看下列代码

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

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

542

主题

5916

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
沙发
 楼主| 发表于 2020-6-26 13:16:23 | 显示全部楼层
回复 支持 反对

使用道具 举报

542

主题

5916

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
板凳
 楼主| 发表于 2020-6-27 13:03:36 | 显示全部楼层
回复 支持 反对

使用道具 举报

542

主题

5916

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
地板
 楼主| 发表于 2020-7-15 09:30:50 | 显示全部楼层
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|玉祥公司客服-玉祥集团客服  本站关键词:快速开发平台

GMT+8, 2024-5-9 19:13 , Processed in 0.127285 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表