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
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.
Ikuti petunjuk berikut ini :
1. Buka Notepad.exe
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.
0 komentar:
Posting Komentar