急!如何用vb循环打开一个文件夹里的多个文件
一个文件夹里有多个文件,文件名依次为NEW0001.ROH、NEW0002.ROH、NEW0003.ROH.....想依次打开这些文件,并读取数据,然后将这些数据一起分析,请问如何用vb实现文件的循环打开,谢谢!
Dim fs, f, ff, f1
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder("你的文件夹")
Set ff = f.Files
For Each f1 In ff
fn = f1.Path
If f1.Type = "ROH 文件" Then
'fn的值就是文件的完整名称，带路径和扩展名
'以下加入你的打开和处理文件代码
End If
Next
答：楼上学姐说的很对！再补充一下 首先添加microsoft common dialog controls 6.0控件。 然后在代码中写： Private Sub ...详情>>
