一个好玩的东东，大家可以简易用PASCAL来发音。
以下代码。：
Uses Dos;
Var f:text;
Begin
Assign(f,'MyVoice.Vbs');
ReWrite(f);
WriteLn(f,'CreateObject("SAPI.SpVoice").Speak "几"'); //在 几 处输入您要发音的文字，中英等等皆可
Close(f);
Exec('MyVoice.Vbs','');
End.
复制过去吧，很好的
求关注。。
pascal镇楼

对了，要打开自动生成的文件，也可以自动过程导入