Membuat Komputer Berbicara Menggunakan Notepad

Seperti judul di atas membuat komputer kita bisa berbicara apa yang kita perintahkan, berikut cara membuatnya :

1. buka notepad
2. copykan coding berikut
           Dim msg, sapi
           msg = "Ganti dengan kata-kata anda"

          Set sapi = CreateObject ( "sapi.spvoice")
          sapi.Speak msg
3. Kemudian save dengan nama_file.vbs

100% Tested n Worked..!!

Selamat Mencoba