![]() |
2011-06-19
, 15:37
|
|
Posts: 337 |
Thanked: 283 times |
Joined on Nov 2009
@ NYC
|
#12
|
Dim msg, sapi msg="test" While msg > "" msg=InputBox( "Enter your text","Say it") Set sapi=CreateObject( "sapi.spvoice" ) sapi.Speak msg Wend
![]() |
Tags |
epic fail, for lorul2 |
Thread Tools | |
|
"Microsoft Sam is the default voice for Windows XP. Beginning with Windows Vista and Windows 7, Microsoft Anna is the default English voice."
http://en.wikipedia.org/wiki/Microso...-speech_voices