VB语音朗读2.0，新增语言选择！

2256328

注：原版系统直接可用，ghost版被精简过的系统，请自行安装微软TTS语音引擎，不然只能读英文或者读不了
本软件为VB编写，调用微软TTS语音引擎，与第一版相比，添加语言选项，如图：

满50L开源，满10热心免CB，先放出部分源码：(如果你要要自行创建的话，请修改资源名为你的，并创建建和我的界面一样的界面，右下角那个可有可无，文本框、那个表格和按钮必须要有，
我的资源名：Txt_Show,Cmd_Pause,Cmd_Say,Cmd_Stop,VoiceL）
[Visual Basic] [color=rgb(51, 102, 153) !important]纯文本查看 [color=rgb(51, 102, 153) !important]复制代码
[backcolor=rgb(27, 36, 38) !important][color=white !important][backcolor=rgb(67, 90, 95) !important]

[color=white !important]?

1 2 3 4 5 6 7 8

Private Sub Form_Load()     Set Voice = New SpVoice     Dim Token As ISpeechObjectToken     For Each Token In Voice.GetVoices     VoiceL.AddItem (Token.GetDescription())     Next     VoiceL.ListIndex = 0 End Sub

下载地址：成品：

第一版和VB6.0企业精简版下载地址（免CB）：http://pan.baidu.com/s/1bns7bt1 密码:s8ur

满50L开源，满10热心免CB