桌面上文件夹内的子文件夹

Sub-folder inside folder on desktop

我想在我已经在桌面上创建的文件夹 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(路径),但是路径是什么?

我不知道用于在文件夹 "X".

中创建文件夹 "Y" 的语法

也许,path = My.Computer.FileSystem.SpecialDirectories.Desktop & "\X\",但什么也没有创建。

它可能比您想象的更容易: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)

查看文档总是值得的,因为它通常包含有关方法的一些常见用途的有用注释。

好的,我找到了。只是做一个双重组合。

感谢您的帮助。

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