vb.net遍历文件,vbnet遍历文件

VB.NET 遍历文件夹里所有的txt并放在一个文件夹里

Private Sub GetChilren(ByVal Subject As String)

For Each i As String In My.Computer.FileSystem.GetDirectories(Subject)

GetChilren（i）'在这里递归

Next

For Each i As String In My.Computer.FileSystem.GetFiles(Subject)

'''txt，用全局变量或参数类数组、泛型、控件保存每个i

Next

End Sub

相关问答

Q1: 求大神指点 vb.net 怎么 遍历目录下的所有文件夹和文件夹下的所有文件 exe|txt.bmp|dll ...

IO.Directory.GetDirectories("文件夹") '获取文件夹中的所有子文件夹路径。

IO.Directory.GetFiles("文件夹") '获取文件夹下所有文件的路径。

'子文件夹的子文件夹，用递归；

Q2: VB.net遍历某个文件夹，并读取子目录中的指定文件

vb.net：

Dim path = System.IO.Directory.GetFiles("D:\Log\abc", "*.txt", SearchOption.AllDirectories)：搜索该路径下的所有txt类型的目录及子目录

path.AddRange(path)

Dim _RecordInfo As String

Dim _Reader As StreamReader

_Reader = New StreamReader(file, System.Text.Encoding.Default)：'以Default编码的形式读取file文件(文件写入的编码要与读取的编码一致)

Q3: 用vb.net怎样实现在遍历某一文件夹下的所有文件

'把下面的目录改成你要遍历的目录

Dim MyDir = "C:\Windows"

Dim MyInfo = MyDir + "目录下的所有文件包括："

For Each MyFile In System.IO.Directory.GetFiles(MyDir)

MyInfo += Environment.NewLine + MyFile

Next

Me.RichTextBox1.Text =MyInfo