home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic .NET - Read Less - Learn More
/
Visual_Basic.NET_Read_Less_Learn_More_Richard_Bowman_Visual_2002.iso
/
Resources
/
Code
/
Ch5-AccessDirInfo
/
Module1.vb
< prev
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
2001-07-20
|
369 b
|
18 lines
Module Module1
Sub Main()
Dim myDir As New IO.DirectoryInfo("C:\")
myDir.CreateSubdirectory("New Directory")
Dim subDirectory As IO.DirectoryInfo
For Each subDirectory In myDir.GetDirectories()
Console.WriteLine(subDirectory.Name)
Next
Console.ReadLine()
End Sub
End Module