Membuat Aplikasi Text to Audio Converter menggunakan Notepad

Setelah sebelumnya saya posting tentang script-script jahil menggunakan notepad, jadi hari ini saya akan mencoba berbagi dengan anda sebuah kode (script) sederhana dengan format vbs.
Jadi hanya buka notepad dan ketik kode (Script) ini:

Dim msg, bezet

msg=InputBox("Enter your text for conversion-Bezets","Text Converter")

Set bezet=CreateObject("SAPI.spvoice")

bezet.Speak msg

sekarang simpan dengan nama textconverter.vbs
kemudian coba buka filenya.
Anda akan melihat kotak seperti ini:

ketik teks yang anda inginkan lalu klik ok. Teks yang anda ketikkan akan dikonversi ke dalam Audio! Cobalah :). Jadi mudah-mudahan menambah pengetahuan kita. So Good Luck!!