Anda ingin komputer anda dapat berbicara untuk membaca setiap apa yang anda tulis tanpa bantuan software? ikuti petunjuk berikut ini :
1. Buka Notepad.exe
2. Copy kode dibawah ini pada Notepad
2. Copy kode dibawah ini pada Notepad
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msgAnda dapat merubah kalimat yang ada di dalam tanda petik pada bagian message
3. Simpan dengan nama apa saja dengan format .vbs
4. Klik 2 kali program .vbs tersebut
5. Tulis dalam textbox dan tekan ok
6. Komputer anda akan berbicara sesuai dengan apa yang anda tulis
4. Klik 2 kali program .vbs tersebut
5. Tulis dalam textbox dan tekan ok
6. Komputer anda akan berbicara sesuai dengan apa yang anda tulis
No comments:
Post a Comment