Today i'm gonna show you how to make Text Speecher
i think you understand ... something that you write ,click SPEECH and there will speech that what you write ..
The Program is too simple to build , finally will look like this ..

All you need are :
-A Text Box
-2 Command Button
The Text Box size like in photo
the CommandButton1 rename with SPEECH and the Code is
Dim SAPI
SAPI = CreateObject("SAPI.spvoice")
SAPI.Speak(Textbox1.text)
The Commanbutton2 rename with Exit and the code is
End
Best Wishes ,
mendim.


Sign In
Create Account


Back to top









