Listen Text that u write

Text Speech

1. Open notepad and paste the following code 

Dim msg, sapi
msg=InputBox("Enter your text","Talking machine")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

2. save the file with .vbs extension,
   Example: TextSpeech.vbs 

   it will create a VBScript File.

3. Double click on TextSpeech.vbs file 
4. input the text and press ok and listen.