Foxtable(狐表)用户栏目专家坐堂 → 连续增加空行


  共有2470人关注过本帖树形打印复制链接

主题:连续增加空行

帅哥哟,离线,有人找我吗?
newsun2k
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1445 积分:10678 威望:0 精华:0 注册:2014/8/13 16:19:00
连续增加空行  发帖心情 Post By:2014/10/15 16:01:00 [只看该作者]

请问,如何阻止用户通过插入行的按钮,连续插入空行?只让他最多插入一个空行。
保存的时候如何自动删除空行?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/10/15 16:11:00 [只看该作者]

Dim str As String = "1=1"
For Each dr As DataCol In DataTables("表A").DataCols
    str &= " and " & dr.Name & " Is null"
Next
Dim fdr As DataRow = DataTables("表A").Find(str)
If fdr IsNot Nothing Then
    msgbox("有空行")
End If

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/10/15 16:11:00 [只看该作者]

1.BeforeAddDataRow判断当前行所有列都是空就取消增加行

2.在BeforeSaveDataRow判断如果所有列是空就取消保存,并且删除行.

 回到顶部