
Следвай
12
как да накараме компа ни да говори 2 част (директно казване)
557
28.10.2009
трябва да напишете :
strText = inputbox("What should Microsoft Sam say?")
Set objVoice = CreateObject("SAPI.SpVoice")
Ob strText
strText = inputbox("What should Microsoft Sam say?")
Set objVoice = CreateObject("SAPI.SpVoice")
Ob strText
Виж повече
Виж по-малко