VB
Microsoft 开发的一种面向对象的编程语言,其在 .NET Framework 上实现。 以前称为 Visual Basic .NET。
73 个问题
大家好, 我想知道如何在桌面上查找和删除重复文件,并且只保留一个文件 ,谢谢提前
Note:此问题总结整理于:How to find and delete duplicate files on desktop and keep only one file
请看下面的例子。
Dim groups = (New DirectoryInfo(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory))).
GetFiles("*.rdp").GroupBy(Function(file) file.Name).Where(Function(group) group.Count() > 1)
For Each group In groups
Dim needDelete As Boolean = False
For Each file In group
' Delete all deplicate files except the first one
If needDelete Then
file.Delete()
End If
needDelete = True
Next
Next
该代码将删除桌面上所有同名的 deplicate rdp 文件。
如果答案是正确的,请点击“接受答案”并点赞。 如果您对此答案还有其他疑问,请点击“评论”。
注意:如果您想接收相关电子邮件,请按照我们的文档中的步骤启用电子邮件通知 此线程的通知。