c# - 用 VB.NET 创建 5000 个目录

Question

我想创建 5000 个目录，目录的名称是计数器。

下面是我想使用的代码，但这只会为我创建 1 个目录，这是为什么呢？

 Dim Counter As Integer

 Counter = 1

 Do Until Counter = 5000

       FolderPath = "C:/pics/" + Counter.ToString() + "/"
       Directory.CreateDirectory(FolderPath)

 Loop

        Counter += 1

VB.NET 或 C# 都可以，我只想运行一次。

Answer 1

移动counter+=1到 do 循环内。它可能会创建第一个目录，但因为 counter 在循环内从不递增，它可能只是覆盖自身。

改成这样：

Do Until Counter = 5000

       FolderPath = "C:/pics/" + Counter.ToString() + "/"
       Directory.CreateDirectory(FolderPath)
        Counter += 1
 Loop

Answer 2

不要do while与整数一起使用，整数和双精度类型更好地使用函数For：

For Counter as Integer = 1 to 5000
   FolderPath = "C:/pics/" + Counter.ToString() + "/"
   Directory.CreateDirectory(FolderPath)
Next

PS在您的情况下，您需要在声明counter+=1之前移动。loop

Answer 3

你真的应该For为此使用一个循环：

For counter as Integer = 1 To 5000
    FolderPath = "C:/pics/" + counter.ToString() + "/"
    Directory.CreateDirectory(FolderPath)
End For