vb.net - 试图“迭代”一个文件夹

Question

我不确定我是否使用了正确的词：我正在尝试“迭代”使用 Do While

我失败的尝试：

    Sub Main()

    Dim myurl As String
    Dim m As Object
    myurl = "\\myroute\myroute"
    ChDir(myurl)
    m = Dir(myurl)

    Do While m <> ""  '<--m = nothing?

        ...'lines not important here

    Loop

End Sub

但是由于某种原因，当我开始调试时，m 没有值（m=nothing）所以“do while”bucle 被忽略了。我究竟做错了什么？知道怎么做吗？"\myroute\myroute" 确实存在

Answer 1

.NET 中有一个非常有用的方法来执行此Directory.EnumerateFiles：

For Each fileName As String In Directory.EnumerateFiles(myDirectory)
    ' Add your code
Next

您必须导入System.IO命名空间才能使用Directory该类：

Imports System.IO