Oke Cara buat agar komputer kalian bisa bicara ,, gini caranya :
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. RIzal BRoadcaster
Belajar B.Inggris di Komputer tanpa software apapun
Info Post
0 comments:
Post a Comment
Ayo diskusi disini ..