以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助,字符串去重。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189614)

--  作者:夜点蚊香
--  发布时间:2023/12/12 9:22:00
--  求助,字符串去重。
“你好,我的,你好”  求助哪个函数可以字符串去重。
设定字符串是一个集合  str() 


--  作者:有点蓝
--  发布时间:2023/12/12 9:52:00
--  
dim ss() as string = "你好,我的,你好".split(",")
dim lst as new list(of string)
for i as integer = 0 to ss.length - 1
if lst.contains(ss(i)) = false then lst.add(ss(i))
next

msgbox(string.join(",",lst.toarray))

--  作者:y2287958
--  发布时间:2023/12/12 14:27:00
--  
Dim 字符串 As String = "你好,我的,你好"
Output.Show (String.join(vbcrlf, 字符串.Split (",").distinct))