1. Open a new project and call it 'Speech'
2. Add a textbox and a button:

3. Click the 'Speak' button and add the following codes:
 Dim speech = CreateObject("Sapi.Spvoice")
 Dim line As String = TextBox1.Text
 speech.Speak(line)

Press F5 and test your program !