TTS 导出 wav 音频(转)
摘要:TTS 导出 wav 音频实例一:Sub Form_Load()Const SSFMCreateForWrite = 3Const SAFT22kHz16BitMono = 22Const SVSFlagsAsync = 1Set objVoice = CreateObject(“SAPI.SpVoice”)objVoice.Volume = 100objVoice.Rate = 1Set objVoice.Voice = objVoice.GetVoices().Item(0)Set fso = CreateObject(“Scripting.FileSystemObject”)Set f.
阅读全文
posted @ 2011-02-22 16:55