在字符窜里，怎么保证唯一值呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 在字符窜里，怎么保证唯一值呢？

共有2607人关注过本帖树形打印复制链接主题：在字符窜里，怎么保证唯一值呢？

qianqian1530

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00

在字符窜里，怎么保证唯一值呢？ 发帖心情

Post By：2014/11/19 21:10:00 [显示全部帖子]

字符窜是用 “,” 分割的。

dim des as string ="1,2,1,3,5,6,7"

1是重复的，怎么才能删除呢？

*重复可能多个

[此贴子已经被作者于2014-11-19 21:10:37编辑过]

qianqian1530

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：746 积分：5567 威望：0 精华：0 注册：2013/12/4 8:56:00

Post By：2014/11/19 21:31:00 [显示全部帖子]

我想要的效果是这个

Dim des As String = "1,2,1,1,1,1,1,1,3,53,53,53,53,53,5,5,56,7"

Dim des2 As String

Dim ary() As String = des.Split(",")

Dim ls As new List(of String)

For Each s As String In ary

If ls.Contains(s) = False Then

ls.Add(s)

des2 + = "," & s

End If

des2 = des2.Trim(",")

msgbox(des2)

主题：在字符窜里，怎么保证唯一值呢？