將n表示為整數
將I標註為整數
n = 5
對於I = 1到5
MkDir應用程序。路徑與路徑。" \ " & amp我
MakeDir應用程序。路徑與路徑。" \ " & amp我，1，n
接下來我
末端接頭
私有Sub MakeDir(d為字符串，I為整數，n為整數)
MkDir d & amp" \ " & amp我
如果我& ltn然後MakeDir d & amp" \ " & amp我，我+ 1，n