JagoOnline
24th October 2012, 12:44 PM
Buat software text to speech converter Anda sendiri
untuk membuat komputer Anda berbicara apapun yang Anda ketik.
http://i1114.photobucket.com/albums/k526/ohyeah_math/Speaktome.jpg
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.
:loveindonesia :loveindonesia :loveindonesia
</div>
untuk membuat komputer Anda berbicara apapun yang Anda ketik.
http://i1114.photobucket.com/albums/k526/ohyeah_math/Speaktome.jpg
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.
:loveindonesia :loveindonesia :loveindonesia
</div>