Sesuai dengan judul posting kali ini kita akan membahas bagaimana cara Membuat Apps Pembaca Teks dengan Notepad.
Oke langsung aja kita praktekan dan lihat hasilnya.
Langkah pertama:
Buka Notepad
Langkah kedua:
Copy dan Pastekan pada notepad script di bawah ini yang saya tandai dengan warna merah
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Simpan file dengan nama bebas terserah anda dengan extension .vbs
contoh: ( terserahdeh.vbs ) bukan berektension .txt
Untuk menjalankan dobel klik file yang telah dibuat tadi, ketikkan tulisan yang ingin dikonversikan ke voice
Klik OK untuk mendengarkan..
Jika berhasil maka hasilnya akan terlihat seperti gambar di atas.
Demikian bagaimana cara Membuat Apps Pembaca Teks dengan Notepad.
semoga bermanfaat.