如何打开指定路径下的文件 VB.NET (路径已经知道）

Question

如题所述

Answer 1

Path：是初始目录的路径

Private Sub WriteArray(ByVal Path As String)
'写入数组代码在这里，直接将Path写到数组就行了。
Dim dir As New IO.DirectoryInfo(Path)
For Each d As IO.DirectoryInfo In dir.GetDirectories
WriteArray(d.FullName) '递归
Next
End Sub

如果子目录较多那么递归会比较费时间，在调用递归前加入application.doevent就行了，这样在应对大递归时不会死机。
至于数组嘛使用 arraylist 最好了。

回答补充：
把递归去掉就行了啊！

Answer 2

dim MyFileName = 路径+文件名
ME.LISTBOX1.DATASOURCE=SYSTEM.IO.FILE.READALLLINES(MYFILENAME)