Простой способ узнать метку диска

Можно, конечно, использовать функцию API GetVolumeInformation для получения целой тучи информации. 

Но если Вас интересует лишь метка диска, намного проще использовать описанный в справке, но частенько забываемый аргумент функции Dir.

Print Dir("C:",vbVolume)


Страница сайта http://test.interface.ru
Оригинал находится по адресу http://test.interface.ru/home.asp?artId=7617