Open notepad and enter this

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

Save it as a .vbs file then RUN THE FILE!!

Works on XP,im not sure about other OS's (I wonder if it could be gotton to work)