' This sample shows the functions mkdir (Make Directory) ' and rmdir (Remove Directory) Sub Main Dim dirName As String dirName = "t1" mkdir dirName mkdir "t2" MsgBox "Directories: t1 and t2 created. Press OK to remove them" rmdir "t1" rmdir "t2" End Sub