Sudah pada tau belum ternyata komputer juga bisa bicara lho...!!. Mau tau?. saya akan berikan scripnya di bawah ini. Anda tinggal memasukan kata yang anda inginkan dan tekan enter, maka dengarkanlah suaranya.
- Buka Notepad
- Salin script di bawah ini ke notepad anda
- Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
- Lalu save dengan nama mypc.vbs
- Setelah disave coba anda klik 2 kali maka akan muncul seperti gambar di bawah ini. Masukan kata-kata yang anda inginkan, dan enter apa yang terjadi??
0 komentar:
Posting Komentar