Option Strict OnPublic Module CurDriveFunction Public Sub Main() Console.WriteLine("The current drive is {0}.", Left(CurDir(), 1)) End SubEnd Module The current drive is C.