Foxtable(狐表)用户栏目专家坐堂 → [求助]统一字符串中的分隔符


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

主题:[求助]统一字符串中的分隔符

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9468 威望:0 精华:0 注册:2013/5/12 9:22:00
[求助]统一字符串中的分隔符  发帖心情 Post By:2015/6/8 12:05:00 [显示全部帖子]

Dim str As String = "玉米20根  红心苕15    生姜10 蒜米3   薄青椒10       杭椒5 "
如何用代码将上面的字符串中的空格统一为一个空格呢(即分隔符仅为一个空格)?请老师指教!!

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9468 威望:0 精华:0 注册:2013/5/12 9:22:00
回复:(大红袍)Dim str As String = "玉米20根 ...  发帖心情 Post By:2015/6/8 12:41:00 [显示全部帖子]

达到效果了,可代码看不懂,Foxtable中没看到相关的介绍。

感谢“大红袍”老师!

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9468 威望:0 精华:0 注册:2013/5/12 9:22:00
回复:(lsy)Dim str As String = "玉米20根  红...  发帖心情 Post By:2015/6/8 13:25:00 [显示全部帖子]

此方法甚妙,十分感谢“lsy”老师,用Foxtable本身的方法解决了这个问题。

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9468 威望:0 精华:0 注册:2013/5/12 9:22:00
回复:(大红袍)Dim str As String = "玉米20根 ...  发帖心情 Post By:2015/6/27 22:38:00 [显示全部帖子]

"大红袍"老师的先分割后合并的方法更妙.十分感谢!
经测试.Trim不用,结果也正确.

Dim str As String = "玉米20根  红心苕15    生姜10 蒜米3   薄青椒10       杭椒5 "
Dim nstr As String = ""
For Each s As String In str.Split(" ")
    If s > "" Then
        nstr = nstr & " " & s
    End If
Next

 回到顶部