Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Me.RichTextBox1.LoadFile("c:\temp\Commands.txt", RichTextBoxStreamType.PlainText) End sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click sapi.speak(RichTextBox1.Text) End Sub Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click sapi.pause() End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)