提取重复数据

直接上控制台代码:

vbnet 复制代码
Module Module1
    Sub Main()
        Console.WriteLine("请输入数据,以"",""相隔:")
        Dim str As String = Console.ReadLine

        Dim result = From x In str.Split(",")
                     Group By x Into Count
                     Where Count > 1
                     Select x

        Console.WriteLine("重复数据为:" & Join(result.ToArray, ","))
        Console.ReadKey()
    End Sub
End Module

演示效果:

相关推荐
专注VB编程开发20年13 天前
VB.NET,C#在线程中修改UI的安全操作
ui·c#·.net·vb.net
专注VB编程开发20年1 个月前
vb.net oledb-Access 数据库本身不支持命名参数,赋值必须和参数顺序一致才行
数据库·c#·.net·vb.net·oledb
大Mod_abfun2 个月前
VB.net序列化和反序列化的使用方法和实用场景
序列化·vb.net·反序列化
专注VB编程开发20年3 个月前
C#.NET模拟用户点击按钮button1.PerformClick自动化测试
开发语言·自动化测试·c#·vb.net
专注VB编程开发20年3 个月前
写.NET可以指定运行SUB MAIN吗?调用任意一个里面的类时,如何先执行某段初始化代码?
开发语言·vb.net
专注VB编程开发20年3 个月前
WebView2最低支持.NET frame4.5,win7系统
c#·.net·webview2·vb.net
专注VB编程开发20年3 个月前
C#,VB.NET正则表达式法替换代码
正则表达式·c#·.net·vb.net
专注VB编程开发20年3 个月前
Aspose.words,Aspose.cells,vb.net,c#加载许可证,生成操作选择:嵌入的资源
c#·word·.net·vb.net
rrokoko6 个月前
TIOBE 指数 12 月排行榜公布,VB.Net排行第九
编程语言·vb.net
一只小灿灿7 个月前
VB.NET 从入门到精通:开启编程进阶之路
.net·vb.net