[share] Membuat Software Text to Speech sederhana

[JagoOnline]

Buat software text to speech converter Anda sendiri

untuk membuat komputer Anda berbicara apapun yang Anda ketik.







Langkah



1. Buka Notepad.



2. Copas kode di bawah ini ke notepad.




Code:

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message



3. Simpan file, beri nama apapun dengan ekstensi .vbs



4. Jalankan file tersebut, ketik kata apa saja didalam textbox dan tekan OK.



5. Enjoy it!



Mohon dirate ya Gan, klo bermanfaat gak nolak klo dikasi ijo-ijonya.