Mega Code Archive

 

Categories / VB.Net Tutorial / Stream File

 

List all available Drives

Option Strict On Imports System.Collections.ObjectModel Imports System.IO Public Module IterateDrives    Public Sub Main()       Dim drives As ReadOnlyCollection(Of DriveInfo)       drives = My.Computer.FileSystem.Drives       For Each drive As DriveInfo In drives          Console.WriteLine(drive.Name)       Next    End Sub End Module C:\ D:\