رفتن به محتوای اصلی
ثبت گزارش
ثبت گزارش

تبدیل متن به گفتار در ویندوز چگونه است ؟

تبدیل متن به گفتار در ویندوز چگونه است ؟

برای این منظور NotePad را باز کرده و دستورات زیر را درون آن تایپ کنید.

Dim input, obj
("input=InputBox("Enter your text:‎","Automatic
("Set obj =CreateObject("sapi.spvoice
obj.Speak input

کاری که دستورات بالا انجام می‌دهند نشان دادن یک پیغام ورودی در پنجره ظاهر شده و ساخت یک نمونه از شی sapi.spvoice و فراخوانی متد Speak است. بعد از وارد کردن دستورات بالا فایل را با نام دلخواه ذخیره کنید. دقت کنید در زمان ذخیره‌سازی فایل پسوند فایل vbs باشد و نه txt و یا txt.vbs برای این منظور از کادر Save as type گزینه All Files را انتخاب کنید.

حال روی فایل ساخته شده دوبار کلیک کنید. پنجره‌ایی مانند تصویر پیوست ظاهر می‌شود.

در کادر متنی عبارتی را تایپ کرده و کلید ok را فشار دهید. متن وارد شده به صورت شنیداری از طریق بلندگوهای سیستم پخش خواهد شد. به این شکل بدون نیاز به نرم‌افزار خاصی به قابلیت مهمی دست پیدا کرده‌اید!