Aplikasi Komputer Bicara

Ini termasuk trik lama dan sederhana. untuk membuatnya tidak perlu instal software lg, tapi menggunakan notepad bawaan Windows. langsung aja, langkah pertama buka notepad lalu copy  teks di bawah ini kedalam notepad

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

 lalu simpan dengan ekstensi VBS. contoh "voice.vbs"  jalankan aplikasi, lalu muncul jendela ketikan kata kata pada kotak isian. apa yg terjadi ?dan jangan lupa speaker nya...selamat mencoba