Foxtable(狐表)用户栏目专家坐堂 → GetComboListString去除多余分隔符的问题


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

主题:GetComboListString去除多余分隔符的问题

帅哥哟,离线,有人找我吗?
狐表(小白)
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
GetComboListString去除多余分隔符的问题  发帖心情 Post By:2020/10/21 16:03:00 [只看该作者]

有数据列一、二、三列,用以下代码执行后,当某一列存在空值时分隔符号“+“就显示的不是很美观,怎么处理?比如第一、二、三列有不同空值时,如下多余的红色字体的分隔符怎么去除?谢谢!
例如:当第一列是空值时:+2+3      么实现这样的结果2+3 
         当第二列是空值时:1++3     么实现这样的结果1+3    
         当第三列是空值时: 1+2+    么实现这样的结果1+2
   当第一、二列是空值时:+3          么实现这样的结果3
   当第二、三列是空值时:1+          么实现这样的结果1
 
Dim f As String = DataTables("表A").GetComboListString("第一列","","第一列") & "|" & DataTables("表A").GetComboListString("第二列","","第二列") & "|" & DataTables("表A").GetComboListString("第三列","","第三列")
Output.Show(String.join("+",f.split("|").Distinct.ToArray))

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


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/10/21 16:05:00 [只看该作者]

Dim s As String= "+2+3++4+"
s = s.trim("+").replace("++","+")
msgbox(s)

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


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
  发帖心情 Post By:2020/10/21 16:37:00 [只看该作者]

多谢

 回到顶部
帅哥哟,离线,有人找我吗?
狐表(小白)
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
  发帖心情 Post By:2020/10/21 16:54:00 [只看该作者]

已解决

[此贴子已经被作者于2020/10/21 17:04:23编辑过]

 回到顶部