بدین منظور:
از منوی Start وارد Run شده و عبارت notepad را وارد نموده و Enter بزنید تا ویرایشگر Notepad ویندوز باز شود.
اکنون دستورات زیر را عینأ داخل Notepad کپی نمایید:

Dim msg, sapi
msg=InputBox("Matneh khod ra vared namaeed! fibr.blogfa.com","Sokhangoo")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

سپس از منوی File گزینه Save را انتخاب نمایید.
حال نامی برای فایل خود در نظر گرفته و آن را با فرمت vbs. ذخیره کنید. پس از اینکار بر روی دکمه Save کلیک کرده تا فایل شما در محل مورد نظر ذخیره گردد.
اکنون به محلی که فایل ذخیره شده بروید و فایل ساخته شده را با دوبار کلیک اجرا نمایید.
خواهید دید پنجره ای باز میشود که با تایپ عبارت مورد نظر خود در قسمت مربوطه و فشردن دکمه OK میتوانید منتظر شنیدن عبارت وارد شده خود توسط کامپیوتر شوید.
لازم به ذکر است که اینکار طبعأ تنها بر روی حروف انگلیسی امکان پذیر است.