Foxtable(狐表)用户栏目专家坐堂 → [求助]请问判断最后一行是否为空行的代码怎么写呢?


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

主题:[求助]请问判断最后一行是否为空行的代码怎么写呢?

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


加好友 发短信
等级:婴狐 帖子:17 积分:183 威望:0 精华:0 注册:2016/10/16 11:02:00
[求助]请问判断最后一行是否为空行的代码怎么写呢?  发帖心情 Post By:2016/10/25 13:34:00 [只看该作者]

如题,想判断当前表最后一行是否为空行,如果为空行,就不让新增行,求助代码如何写,多谢!

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


加好友 发短信
等级:四尾狐 帖子:857 积分:6156 威望:0 精华:0 注册:2015/12/24 13:02:00
  发帖心情 Post By:2016/10/25 13:45:00 [只看该作者]

遍历列,如果最后一行所有列的值都为空。。。。那么不让新增行
[此贴子已经被作者于2016/10/25 13:45:03编辑过]

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


加好友 发短信
等级:婴狐 帖子:17 积分:183 威望:0 精华:0 注册:2016/10/16 11:02:00
  发帖心情 Post By:2016/10/25 13:59:00 [只看该作者]

以下是引用18523982317在2016/10/25 13:45:00的发言:
遍历列,如果最后一行所有列的值都为空。。。。那么不让新增行
[此贴子已经被作者于2016/10/25 13:45:03编辑过]

那是不是得把所有行的所有列都判断一遍?

能不能做到只判断最后一行的所有列?大概思路知道了,新手学习中,方便的话给个代码我研究下,谢谢!


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2016/10/25 14:21:00 [只看该作者]

Dim r as row = Tables("表A").Rows(Tables("表A").Rows.Count - 1)

Dim mm as Boolean = true

for Each c as col in Tables("表A").Cols

      if r.ismull(c) = false then

          mm = false

      end if

next

return mm


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


加好友 发短信
等级:童狐 帖子:220 积分:1669 威望:0 精华:0 注册:2016/9/3 11:48:00
  发帖心情 Post By:2016/10/25 14:43:00 [只看该作者]

測試,上面出錯!!

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


加好友 发短信
等级:二尾狐 帖子:574 积分:4252 威望:0 精华:0 注册:2015/5/13 8:32:00
  发帖心情 Post By:2016/10/25 14:45:00 [只看该作者]

  if r.ismull(c)    改为  if r.isnull(c.name)

[此贴子已经被作者于2016/10/25 14:45:29编辑过]

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


加好友 发短信
等级:婴狐 帖子:17 积分:183 威望:0 精华:0 注册:2016/10/16 11:02:00
  发帖心情 Post By:2016/10/25 15:03:00 [只看该作者]

感谢以上各位!

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


加好友 发短信
等级:婴狐 帖子:17 积分:183 威望:0 精华:0 注册:2016/10/16 11:02:00
  发帖心情 Post By:2016/10/25 15:34:00 [只看该作者]

以下是引用狐狸爸爸在2016/10/25 14:21:00的发言:

Dim r as row = Tables("表A").Rows(Tables("表A").Rows.Count - 1)

Dim mm as Boolean = true

for Each c as col in Tables("表A").Cols

      if r.ismull(c) = false then

          mm = false

      end if

next

return mm

发现一个问题,我的这个表里面,有好几列是 Boolean 类型的,这个布尔类型是不是默认有值为 false ?用 isnull()  去判断的时候,得出的结果是“不为空”


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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/25 15:57:00 [只看该作者]

是的

 回到顶部