Foxtable(狐表)用户栏目专家坐堂 → 如何自动消除掉不用的字符


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

主题:如何自动消除掉不用的字符

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


加好友 发短信
等级:幼狐 帖子:136 积分:1090 威望:0 精华:0 注册:2011/12/18 14:29:00
如何自动消除掉不用的字符  发帖心情 Post By:2014/2/21 21:36:00 [只看该作者]

如何自动消除掉“不良原因分类”栏目中的字符,我是点按钮3后如何自动把“1”清除掉。


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


加好友 发短信
等级:幼狐 帖子:136 积分:1090 威望:0 精华:0 注册:2011/12/18 14:29:00
  发帖心情 Post By:2014/2/21 21:37:00 [只看该作者]

怎么附件传不上来
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产管理.zip


[此贴子已经被作者于2014-2-21 21:42:40编辑过]

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


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

 看不见图

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


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

 在代码的最后加入这段

For Each c As Col In Tables("录入_table1").Cols
    If c.caption.StartsWith("不良原因分类") Then
        For Each r As Row In Tables("录入_table1").Rows
            r(c.Name) = Nothing
        Next
    End If
Next

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


加好友 发短信
等级:幼狐 帖子:136 积分:1090 威望:0 精华:0 注册:2011/12/18 14:29:00
  发帖心情 Post By:2014/2/21 23:01:00 [只看该作者]

谢谢!问题解决。

 回到顶部