Kamis, 31 Mei 2012

CARA MEMBUAT KOMPUTER ANDA MENGATAKAN APA YANG ANDA TULIS

HY,kali ini saya akan share cara membuat komputer/pc mu berbicara dengan hanya menggunakan notepad
kalo begitu langsung saja ikuti langkah-langkah berikut:

1)buka notepad

2)salin teks dibawah ini


Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

3)simpan file tersebut dengan format .vbs (contoh: Speak.vbs)
4) lalu buka file tersebut dan masukan text yang anda inginkan


5) pilih ok dan dengarkan

sekarang anda bisa membuat komputer anda mengatakan apa yang anda ketik
namun program ini hanya bisa berbicara dengan bahasa inggris
jadi anda juga bisa belajar cara pengejaan bahasa inggris yang tepat dari program ini

terima kasih 
semoga bermanfaat

Tidak ada komentar:

Posting Komentar