2011-01-05 132 views

回答

5
Imports System.IO 

Dim fInfo As FileInfo()     
Dim i As Integer = 0   
Dim path AS String = "INSERT FILE PATH"  
Dim dInfo As New DirectoryInfo = New DirectoryInfo(path) 

fInfo = dInfo.GetFiles("*.txt")    
Dim files As String()     
Dim File As String     
files = Directory.GetFiles(path, "*.txt")     
For Each File In files       
    'Do Something With The File     
    i += 1     
Next 
+0

FileInfo()和DirectoryInfo发送错误,说他们是未定义的。目录说它没有声明=/ – Voldemort 2011-01-05 18:55:42

+0

对不起,我的意思是Visual Basic .NET? – Voldemort 2011-01-05 19:00:06

+0

将“Imports System.IO”添加到代码文件的顶部 – 2011-01-05 19:04:07