How to make your computer speak

Hello guys
Today i teach you how to make your computer to speak whatever you type
Note : support on all Microsoft Operating System 
You don't need to learn programming skills.
You just have follow these steps what i m gonna tell you 
just follow the three steps and make your computer speak  whatever you type.

Step 1 : open notepad and copy and paste the following code into it 

Dim message, sapi
message=InputBox("You type i speak?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

Step 2 : save the notepad as speak.vbs at your desktop.
Step 3 : Now double click to speak 

enjoy 
..............................................................
thank you