Text to speech VBS script

[GmAz]

I use a text to speech script for fun. It is as follows:

 

Set objVoice = CreateObject("SAPI.SpVoice")

objVoice.Speak Inputbox("Enter Text")

 

I am no programmer and found it on the internet. what i need though is for the window not to close after I press enter. Would anyone be willing to make a vbs script that wont' close after i hit enter to speak the text.

[hierovision]

Use a text box and a submit button instead of an inputbox. Set the action on the submit button to objVoice.Speak txtBox.Text