Можно используя плагин NeobookDX. Если загрузить в него файл, он все о нем скажет.
Создай скрытый за пределами окна проекта прямоугольник Rectangle1, создай в нем плеер:
dxCreate "Rectangle1" "[Player1]" ""
dxOpenFile "[Player1]" "[File]" - [File] это твой файл музла
Длительность появится в переменной [Player1.Length] лови ее оттуда, загружай новый файл и т.д.
В конце не забудь убить плеер dxDestroy.Добавлено (22 Июля 2014, 22:10)
---------------------------------------------
Если не хочешь носить плагин для этого, можно через vbscript подключиться к штатному Windows MediaPlayer и попросить его посчитать, но наверное это будет медленнее отдупляться если файлов много.