ScreenShot :
1. Buka Notepad
2. tulis Code dibawah ini
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("Sapi.spvoice")
sapi.Speak msg
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("Sapi.spvoice")
sapi.Speak msg
Note: code yang berwarna merah dapat diubah sesuai keinginan Anda
3. Save dengan nama apa saja dengan format .vbs
contoh: sapi.vbs
4. Klik 2 kali program .vbs yang anda simpan dalam komputer
5. Tulis dalam textboxt dan tekan OK
6. Komputer Anda akan berbicara sesuai dengan apa yang di input
Sumber: Disini
.
Artikel Terkait
- DoPdf 7
- WinRar V.4
- Mengcopy lebih cepat dengan Extreme Copy-Pro
- Membuat Komputer Berbicara
- Cara Mengunci Folder Tanpa Software
- Destop Icon Toy 4.5 Full Version
- Cara Memberi Google Translate pada Blog
- Cara Membuat Spoiler (Kaskus) di Blog
- Kumpulan Situs Pemutar Musik (Lagu) Untuk Blog/ Website
- Cara Install Windows Xp dan Windows 7 Lewat USB
Tidak ada komentar:
Posting Komentar