ایجاد یک فایل سخنگو برای تبدیل نوشته به گفتار!

ایجاد یک فایل سخنگو برای تبدیل نوشته به گفتار!

سلام این پوســتم بســـار جالب است حــتــمــآ کــار کــنــیــد!

این دفه میخواهم یک  نوشته را به گفتار تبدیل کنیم...

××این کار را که میگم به ترتیب انجام بدین آن وقت هر نوشته ای را که میخواهید به English بنویسید و کامپیوتر آنرا برای تان به گفتار تبدیل میکنه.....!

✘ اول از همه برنامه ی notepad را باز کنید...

✘حالا در برنامه notepad این دستور را که میگم عینآ وارد کنید...

Dim msg, sapi

msg=InputBox("Matneh khod ra vared namaeed!                                                                                                              !متن خود را وارد کنید                                                                                                                                                                                www.behroz24.blogsky.com","Sokhangoo")

Set sapi=CreateObject("sapi.spvoice")                                                                        

sapi.Speak msg

✘ حالا از منوی File گزینه save را انتخاب کنید...

✘برای فایل تان یک اسم بگزارید و بعدش vbs. را بنویسید...

به عنوان مثال:  behroz.vbs   بنویسید!

✘حالا به آدرس که فایل تان را save کردین بروید و فایلی را باز کنید....

+چیزی که میخواین این فایل سخنگو بگوید را به English در کادر بنویسید و ok کنید...

همین!

××نکته:××

>>>>اگه میخواهی که این فایل یک نوشته ی فارسی را برایتان بگوید نوشته تا را میتوانید به Finglish بنویسید!<<<<

این هم مثال آن