Cara Membuat Komputer Berbicara Sesuai Dengan Apa Yang Kita Tulis

Sekarang saya akan share lagi tentang bermain-main dengan komputer. Sekarang kita akan bermain dengan cara berbicara dengan komputer. Menarik bukan? :D

Yang kita butuhkan hanya lah Notepad, langsung saja ikuti langkah-langkah berikut:

1. Copy kode berikut, lalu pastekan kedalam notepad

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

2. Simpan file tersebut dengan ekstensi .vbs conroh nya speak,vbs 

3. Untuk menjalankan, double klik pada file tersebut. dan klik OK untuk mendengarkan.