[Genius Live]

(28-11-13, 04:09 AM)مالكـ كتب : ضروري الكود الثاني ....

Add the following reference from the solution explorer screen
Interop.SpeechLib
File exists in the attachments
In declarations section, type the following code:

كود :

Dim WithEvents X As New SpeechLib.SpVoice

In the event that you want it to hear the sound type the following code:

كود :

X.Voice = X.GetVoices().Item(0)
X.Rate = 1
X.Speak("welcome " & TextBox1.text)