Selamat Datang Kawan - kawan Teknik Informatika B_2009 Universitas Siliwangi and temen temen semua :)

Kamis, 27 Oktober 2011

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 

0 komentar:

Posting Komentar