Tips Membuat Komputer Berbicara

wihiiiii nemu hal bagus! saya akan beri tahu anda cara membuat PC berbicara (emang unya mulut :p)


1) buka notepad
2) copas kode ini :
Dim pesan, sapi
pesan = InputBox ( "Apa yang Anda ingin saya katakan?", "Berbicaralah kepada-Ku")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak pesan

3) simpan filenya dengan nama apa saja yang penting formatnya vbs. contoh : speak.vbs
4) buka filenya dan tulis sebuah kata
5) PC anda akan mengeluarkan suara apa yang anda tulis tadi

SS :

SELAMAT MENCOBA

sumber : http://bebekdanbajaj.blogspot.com/