This video guides you on how to Convert Text To Speech Using Notepad.Copy paste the below code in notepad and save it as .vbs file:-
Dim message, sapi
message=InputBox("Command me anything in text to say?","Ready to Listen")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message