1. Buka Notepad
2. Copy dan Pastekan pada notepad script berikut ini
3. Simpan file dengan nama bebas terserah anda dengan extension .vbsDim message, sapi
message=InputBox("Apa yang Anda ingin saya katakan?","Komputer Berbicara")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
( VoicePC.vbs ) bukan berektension .txt
4. Untuk menjalankan dobel klik file yang telah dibuat, ketikkan tulisan yang ingin dikonversikan ke voice
5. Klik OK untuk mendengarkan..
~ NOTE :
- ganti tulisan biru sesuka anda untuk menampilkan pertanyan
- ganti tulisan orange sesuka anda untuk menampilkan judul
Semoga bermanfaat dan selamat mencoba ... ^_^