hut ri ke 70, hut ri 2015, hut ri ke 70 logo, hari kemerdekaan indonesia 17 agustus 2015, logo hut ri ke 70

Tips Membuat Komputer Berbicara


Pasti anda penasaran dengan judul Tips Membuat Komputer Berbicara !!! Lalu dalam hati anda akan mulai bertanya-tanya apakah benar komputer dapat berbicara ?? Baiklah tanpa perlu basa-basi dari pada anda semakin penasaran mari kita coba praktekan saja langsung…

Buka notepad  kemudian copas kode di bawah ini ke notepad tersebut

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "http://freebiexp.wordpress.com")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg


Lalu Save as dengan nama "mypc.vbs" tanpa tanda kutip, kemudian rubah Save as type-nya menjadi All Files.


Berikut hasilnya:


Jika anda ingin komputer anda dapat langsung berbicara tanpa perlu memasukan kata-kata di InputBox ketika file mypc.vbs tersebut di klik 2x, maka anda dapat menggunakan kode di bawah ini

Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg


SELAMAT MENCOBA (0_0)

Subscribe to receive daily freebies, updates and Special offers straight into your inbox.

Your Email is safe with us - No spam, we promise