Foxtable(狐表)用户栏目专家坐堂 → 从 excle2003 复制数据问题


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

主题:从 excle2003 复制数据问题

帅哥,在线噢!
wei0769
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1816 积分:19334 威望:0 精华:0 注册:2013/4/10 14:38:00
  发帖心情 Post By:2017/5/25 14:39:00 [只看该作者]

字符串中的空格怎样去除?

 


图片点击可在新窗口打开查看此主题相关图片如下:7.png
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
wei0769
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1816 积分:19334 威望:0 精华:0 注册:2013/4/10 14:38:00
  发帖心情 Post By:2017/5/25 15:12:00 [只看该作者]

Dim t As Table = Tables("表A")
For Each r As Row In t.Rows
    For Each c As Col In t.Cols
        r(c.name) = r(c.name).trim("""").replace(chr(10), "").replace(chr(13), "").replace(" ","")
    Next
   
Next

t.AutoSizeRows


 回到顶部
总数 12 上一页 1 2