Komputer Berbicara

Mungkin anda binggung tentang Komputer Berbicara? Apakah komputer itu bisa berbicara menurut yang kita minta? Owwhh...bukan itu maksudnya! Cara ini dimungkinkan untuk orang yang tidak mengerti cara membaca dalam bahasa Inggris! Seperti dalam Google Translate, di Program itu anda bisa memasukan kata-kata sampai puluhan, berbeda dengan Goggle Translate, dia hanya 20 kata atau lebih saja. Coba kita buktikan bagaimana cara membuatnya? Hanya dengan menggunakan Notepad saja! Persiapan : - Notepad - Kode-kode yang tersedia di sini Cara : Buka Notepad, masukan kode-kode di bawah ini di notepad :

Dim pesan, sapi pesan = InputBox ( "Isi kotak ini dengan kata-kata! Di sarankan menggunakan bahasa Inggris supaya lebih tepat! By Solution", "Komputer Berbicara (DK)") Set sapi = CreateObject ( "sapi.spvoice") sapi.Speak pesan

Setelah itu simpan dengan nama file "Komputer berbicara.vbs" Save as type : "All File"

Dan hasilnya seperti ini :