C:\Documents and Settings\Administrator\桌面
求助遍历桌面文件夹中的文件的代码 谢谢！
For ？？？？？
   MsgBox 循环到的文件名
Next

   Dim fso, MyPath$
   Dim myfile,
   Set fso = CreateObject("scripting.filesystemobject")
   For Each myfile In fso.getfolder(MyPath).Files                           
       zzwjm = myfile.Name                                                
   Next myfile
首先感谢老师！
另外，请教大侠，我以前的代码是上面这样的，现在运行不起来，因为对代码不理解，所以不知道原因在哪，希望到老师指导：
   Set fso = CreateObject("scripting.filesystemobject")
   For Each myfile In fso.getfolder(MyPath).Files                           
这两句代码的总含义是什么？红色字的单词又是什么意思？

谢谢！

[此贴子已经被作者于2015-12-20 10:43编辑过]

谢谢