Jangan lupa di Follow ya :)
Yps

close
Protected by Copyscape Online Copyright Protection Software

Friday, December 17, 2010

0 Cara agar Komputer Bisa Bicara ( Ngomong )


cara membuat agar komputer dapat berbicara ,, cranya :
clik start - Run - (tuliskan Notepad) - Notepad , copy paste kode ini :

Dim msg, sapi
msg = InputBox ( "Apa Yang Ingin kau katakan ?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Save file notepad tersebut dalam format ( .vbs ) caranya rubah (.txt) menjadi (.vbs)

selesai...

by: SURYA HADI