كيف تجعل جهازك ينطق بما تريد

اهلا بكم , تدوينة اليوم عبارة عن طريقة رائعة تساعدك في جعل جهازك ينطق بأي شىء تريده عبر تحويل النصوص الى كلام بدون استخدام اي برنامج .

1 – قم بفتح برنامج المفكرة Notepad وقم بلصق الكود التالي فيه

Dim msg, sapi

msg=InputBox("Enter your text ","By informatique pro")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg

2 – قم بحفظ الملف بإسم Audio.vbs

والان قم بتشغيل الملف من الايقونة الموضحة بالصورة

وقم بكتابة ما تريد ان ينطقه الكمبيوتر واضغط OK