CARA MEMBUAT KOMPUTER BICARA

Caranya :

1. Buka notepad, start-->all programs-->accesories-->notepad

copas kode di bawah ini !!

Dim msg, sapi msg = InputBox ( "Apa Yang Ingin Saya Katakan?", "Masukan Kata-Katanya Disini !!") Set sapi = CreateObject ( "sapi.spvoice") sapi.Speak msg

2. Simpan dengan nama apa saja, yang penting harus ber-exstensi .vbs (contoh: bicara.vbs)

3. Klik 2 kali file yang anda simpan tadi

4. ketikan kata2 yang mau di ucapkan komputer

5. dengarkan suara yang keluar dari komputer anda, selesai