# 本脚本将某文件中的所有声音文件批量读取一遍,适合于检测某文件中声音文件是否可以读取。 # Qibin Ran, 2018-12-11. form Dialogue sentence openpath 请在此输入需要读取的声音文件地址 endform if right$(openpath$,1)<>"\" openpath$=openpath$+"\" endif Create Strings as file list... fileList 'openpath$'*.wav numberOfFiles=Get number of strings for ifile from 1 to numberOfFiles select Strings fileList fileName$=Get string... 'ifile' simpleName$=fileName$-".wav" Read from file... 'openpath$''fileName$' select Sound 'simpleName$' Remove endfor select Strings fileList Remove exit 所有声音文件均可以读取!