Kalau komputer bisa ngomong.. dia pasti tak akan bohong...



1. Buka Notepad.
2. Copy code berikut kemudian paste ke notepad.
Code:
Dim userInput
userInput = InputBox("Write a message for me to say")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak userInput
4. Buka file tadi, dan ada tempat untuk kita mengetik. (klik aja)
5. Setelah selesai mengetik tekan OK.
6. Komputer akan menyebutkan kata yang kita ketik tadi.
Tidak ada komentar:
Posting Komentar