Foxtable(狐表)用户栏目专家坐堂 → 要将一个表中所有数值型的内容清零或清空 代码如何写?


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

主题:要将一个表中所有数值型的内容清零或清空 代码如何写?

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


加好友 发短信
等级:九尾狐 帖子:2552 积分:20045 威望:0 精华:0 注册:2012/5/19 11:57:00
要将一个表中所有数值型的内容清零或清空 代码如何写?  发帖心情 Post By:2016/4/1 22:39:00 [只看该作者]

要将一个表中所有数值型的内容清零或清空 代码如何写?

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


加好友 发短信
等级:小狐 帖子:341 积分:3400 威望:0 精华:0 注册:2013/5/17 10:55:00
  发帖心情 Post By:2016/4/1 23:02:00 [只看该作者]

For Each c As Col In Tables("表A").Cols
    If c.IsNumeric Then
        For Each dr As Row In Tables("表A").Rows
            dr(c.name) = 0
        Next
    End If
Next

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/4/2 9:29:00 [只看该作者]


 回到顶部