我想在我已经在桌面上创建的文件夹X中创建一个子文件夹Y(见下文)。
Dim myFolder As String = IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.Desktop, "X")
If (Not (System.IO.Directory.Exists(myFolder))) Then
System.IO.Directory.CreateDirectory(myFolder)
End If
我想我应该使用:System.IO.Directory.CreateDirectory(path),但路径是什么?
我不知道用于创建文件夹的语法" Y"在文件夹内" X"。
也许,path = My.Computer.FileSystem.SpecialDirectories.Desktop& " \ X \",但没有创建。
答案 0 :(得分:1)
可能比您想象的要容易:Directory.CreateDirectory
将创建所需的所有目录,因此您可以使用:
Dim myFolder = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory), "X", "Y")
Directory.CreateDirectory(myFolder)
或者如果您使用的是.NET Framework 1.1,它只允许在Path.Combine中使用两个项目:
Dim rootFolder = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory), "X")
Dim myFolder = Path.Combine(rootFolder, "Y")
Directory.CreateDirectory(myFolder)
总是值得查看文档,因为它通常包含有关方法的一些常见用法的有用注释。
答案 1 :(得分:0)
好的,我找到了。只做一个双重组合。
感谢您的帮助。
JLuc01
Dim Folder As String = IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory), "X")
Dim subFolder As String = IO.Path.Combine(Folder, "Y")
If (Not (System.IO.Directory.Exists(subFolder))) Then
System.IO.Directory.CreateDirectory(subFolder)
End If