تبدیل متن به گفتار در رایانه

تبدیل متن به گفتار در کامپیوتر

متن خود را به نرم افزار مبدل گفتار تبدیل کنید تا کامپیوتر شما هر آنچه را که تایپ می کنید صحبت کند.

 

مراحل :

 

 

Notepad را باز کنید.

 

 

کد زیر را کپی کنید و آن را در notepad پیست کنید.

 

 Dim message, sapi

message=InputBox("What do you want me to say?","Speak to Me")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak message

 

 

 

فایل را با هر نام با پسوند vbs ذخیره کنید.

 

 

 

فایل را اجرا کنید، هر چیزی را که میخواهید در جعبه متن تایپ کنید و OK را فشار دهید.

 

مکرومه بافی

 

 برای ثبت آگهی رایگان به سایت شهر24 مراجعه کنید

سایت شهر24 مرجع آگهی های رایگان.با سایت شهر24 دیده شوید