Foxtable(狐表)用户栏目专家坐堂 → 行删除


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

主题:行删除

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


加好友 发短信
等级:幼狐 帖子:169 积分:1517 威望:0 精华:0 注册:2013/8/21 9:41:00
行删除  发帖心情 Post By:2014/4/7 17:03:00 [只看该作者]

窗口1存在 Tables("入库单.入库明细"),这个table 的“数量”列有些为空值,添加一个按钮,希望点击这个按钮的时候,能够一次全部删除这些空值行,请教这个按钮的代码怎么写?谢谢!

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


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

for each r as row in tables("入库单.入库明细").rows

    if r("数量") = 0 then

        r("数量") = nothing

    end if

next


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


加好友 发短信
等级:幼狐 帖子:169 积分:1517 威望:0 精华:0 注册:2013/8/21 9:41:00
  发帖心情 Post By:2014/4/7 21:02:00 [只看该作者]

添加一个按钮,希望点击这个按钮的时候,能够一次全部删除这些空值的行,上面代码好像没有与批量删除相关的代码


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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2014/4/7 21:10:00 [只看该作者]

DeleteFor

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


加好友 发短信
等级:幼狐 帖子:169 积分:1517 威望:0 精华:0 注册:2013/8/21 9:41:00
  发帖心情 Post By:2014/4/7 21:19:00 [只看该作者]

deletefor 只能对datatable,对table好像要复制些,能就上面的要求给个相对清晰的代码吗?谢谢!

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


加好友 发短信
等级:幼狐 帖子:169 积分:1517 威望:0 精华:0 注册:2013/8/21 9:41:00
  发帖心情 Post By:2014/4/7 21:19:00 [只看该作者]

复杂些

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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2014/4/7 22:28:00 [只看该作者]

for i as integer = tables("入库单.入库明细").count-1 to 0 step -1

    if tables("入库单.入库明细").rows(i)("数量") =0

        tables("入库单.入库明细").Rows(i).Delete()

    end if

next


 回到顶部