Membuat Komputer kita bisa Bicara...lucu ^_^

Oke, langsung aja…

Buka notepad dan copas kode berikut…

Code:

Dim msg, jasakom

msg=InputBox("Masukkan Kalimat","Ngomong Dong")

Set jasakom=CreateObject("sapi.spvoice")

jasakom.Speak msg

Nah simpan dengan nama Terserah.vbs dan jalankan…

Setelah itu masukkan atau ketik kata2 yang diinginkan…

Nyalakan speaker sekeras mungkin dan “ENTER”…

Semoga Bermanfaat ...

source :

http://ajiswild.blogspot.com/2012/02/infotips-and-tricktrick-lain-membuat.html