Jumat, 27 Januari 2012

Woww, Komputer Bisa Bicara

Pasti heran kan dengan judul di atas. Emang komputer bisa bicara? bisa donk, masa' gak tau? "NDESO" hehe. Komputer bukannya bicara sendiri, tapi kita perintah untuk bicara. Penasaran? langsung saja ke TKP
Cekidot
Ikuti Langkah berikut!
  1. Jalankan aplikasi Notepad
  2. Isikan Kode berikut:
    Dim msg, sapi
    msg=InputBox("Masuakan kato-kato!","Apo yang ka dikecek!")
    Set sapi=CreateObject("sapi.spvoice")
    sapi.Speak msg
  3. Save dengan format vbs. Contohnya test.vbs
Buka aja file yang sudah disimpan tadi, masukkan kata yang dalam bahasa Inggris akan diuapkan oleh komputer.

Selesaaaiii. Gimana? mudah bukan?
Comments
2 Comments

2 komentar:

MelMeladya mengatakan...

mantaap :D

Unknown mengatakan...

@mellady : makasih :)