Just a basic code to tell your computer to say what you want it to say
first open up notepad, then copy and paste the code below in exactly as it is
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
then go to file>save as and make sure you select all files then name it what you want to and don't forget to put .vbs at the end
so my file was called speak.vbs and your computer will say what you write
so save to your desktop and try it out