Mega Code Archive

 

Categories / VB.Net / File Directory

 

DirectoryInfo CreateSubdirectory

Imports System Imports System.IO Public Class CreateSubTest     Public Shared Sub Main()         Dim di As New DirectoryInfo("TempDir")         If di.Exists = False Then             di.Create()         End If         Dim dis As DirectoryInfo = di.CreateSubdirectory("SubDir")         dis.Delete(True)         di.Delete(True)     End Sub 'Main End Class 'CreateSubTest