شما می توانید متن خود را به نرم افزار مبدل گفتار تبدیل کنید تا کامپیوتر شما هر آنچه را که تایپ می کنید برایتان بخواند. برای این کار مراحل زیر را در کامپیوترتان دنبال کنید:
1. Notepad را باز کنید.
2. کد زیر را کپی کنید و آن را در notepad پیست کنید.
Dim message, sapi
message=InputBox(“What do you want me to say?”,”Speak to Me”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
3. فایل را با هر نام با پسوند vbs ذخیره کنید.
4. فایل را اجرا کنید، هر چیزی را که می خواهید در جعبه متن تایپ کنید و OK را فشار دهید.
