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 msg
Anda 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
Tidak ada komentar:
Posting Komentar