- Langkah-Langkah:
- Pertama buka dulu notepad
- Setelah itu copy code di bawah ini ke notepad:
Dim pesan, sapipesan = InputBox ( "Apa yang Anda ingin saya katakan?", "Berbicaralah kepada-Ku")Set sapi = CreateObject ( "sapi.spvoice")sapi.Speak pesan - Setelah itu "Save AS" dengan nama "speak" atau terserah kalian asalkan harus diakhiri dengan .vbs. Misal, "Speak.vbs".
- Setelah itu klik dua kali untuk membuka file tadi, maka akan keluar jendela dialog box seperti ini :
- Setelah itu, tulis apa saja, contohnya kita tulis "hi, good morning" maka setelah klik tombol OK komputer akan mengatakan sesuai yang kita tuliskan tadi.
Sabtu, 23 Januari 2010
Wow... Komputer Kita Bisa Ngomong...!!!
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar