S.a arkadaşlar sizlere microsoft sam&񗝉i kullanarak pcYi konusturmayı gostericem.

Exe Project açıyoruz,Form1&񗝉e 1 adet text box ve Command buton koyuyoruz.

Bu Kodlarıda form1&񗝉e koyuyoruz ve speakerınız hazır.

Quote:
Private Sub Command1_Click()
Set ObjVoice = CreateObject("SAPI.spVoice")
strTxt1 = text1
ObjVoice.speak strTxt1
End Sub