Snippets

Here is your code snippet

Code


Display all drives

Display all drives on your system

'create a new console application and paste this between the Sub Main() and End Sub Dim drives() As String

drives = System.IO.Directory.GetLogicalDrives()

Dim enumerator As System.Collections.IEnumerator

enumerator = drives.GetEnumerator

While enumerator.MoveNext
Console.WriteLine(CStr(enumerator.Current))
End While