读书人

急请问(文本文件枚举)

发布时间: 2012-07-05 07:59:18 作者: rapoo

急请教(文本文件枚举)
现在有一个文件夹下有若干文本文件,请教:怎么能用循环的方式将这些文本文件顺序读出?

[解决办法]

VB code
Sub listFiles()    Dim myPath As String    myPath = Dir("c:\temp\*.txt") '指定路径    Do While myPath <> ""         '执行回圈       Debug.Print myPath         '将档案名称显示出来       myPath = Dir               '寻找下一个档案    LoopEnd Sub 

读书人网 >VB

热点推荐