显示出c根部录下,所有的文件及文件夹。
---------------------------------------
MyPath = "c:\"   
MyName = Dir(MyPath, vbDirectory)   
Do While MyName <> ""  
    MsgBox (MyName)
    MyName = Dir
Loop
----------------------------------------Do While
.
.
.
Loop   是执行循环,我就纳闷了,它的光标是怎么下移的。