devxlogo

VolumeLabel – Read the label of a disk volume

VolumeLabel – Read the label of a disk volume

' Return the volume label of a disk' Pass a null string for the current diskFunction VolumeLabel(drive As String) As String    Dim temp As String    On Error Resume Next    temp = Dir$(drive, vbVolume)    ' remove the period after the eigth character    VolumeLabel = Left$(temp, 8) + Mid$(temp, 9)End Function

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist