Senin, 19 Maret 2012

Cara Buat Computer Anda Berbicara Versi Basi

Membuatnya gampang, pertama buka Notepad
copy paste script berikut :

    Dim msg, sapi
    msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
    Set sapi = CreateObject ( "sapi.spvoice")
    sapi.Speak msg
http://t1.gstatic.com/images?q=tbn:ANd9GcRBedFB3Cezf5Uw_2lhC0WvfElKODg4CNDWW1L0uLgIDbGUTtPhtg

Save As… kemudian pilih All Files lalu beri nama mypc.vbs


Selesai
Cara Membuat Computer Berbicara

Coba sekarang anda dobel klik file tersebut apa katanya …ngakak

[Image: ruus8z.jpg]


Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik dua kali langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :

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

Selamat mencoba kalo bermanfaat
Agen Bola online Agen Bola online

2 komentar:

  1. mantap bro langsung coba nihh.. comen back ya > http://pilihanku.info

    BalasHapus

 

Tutorial Vicahya' - Just Sharing © 2012 | Template by Bamz Display Pagerank