Private Sub Timer1_Timer()
JS = 0
Set s = CreateObject("sapi.spvoice")
s.speak "计划产量 " & Form1.M0.Value & "箱"
s.speak "当前产量 " & Form1.M1.Value & "箱"
s.speak "剩余产量 " & Form1.M2.Value & "箱"
End Sub
每当朗读时程序就变的不可操作,而且朗读完成后我的mscomm控件就出现下表越界的问题,不朗读,运行几个小时都没问题,M0 M1 M2是一个数码管控件的整形数值。想请教高手,如何做TTS才可以避免以上的情况。
VB程序做TTS 假死
答案:1 悬赏:0
解决时间 2021-01-31 02:42
- 提问者网友:朱砂泪
- 2021-01-30 16:14
最佳答案
- 二级知识专家网友:陪我到地狱流浪
- 2021-01-30 16:39
对象没有关闭。
建议s用完后将其=nothing
建议s用完后将其=nothing
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯