[سامي محمد]

وعليكم السلام ... تفضل

كود :

  For Each x As String In My.Computer.FileSystem.GetFiles("C:\Users\Sami\Desktop\1")
            IO.File.Delete(x)
        Next