Imports System.IO Public Class Tester Public Shared Sub Main Dim DirInfo As System.IO.DirectoryInfo DirInfo = System.IO.Directory.CreateDirectory("c:\a") DirInfo.CreateSubdirectory("a") End Sub End Class