اجعل الكمبيوتر الخاص بك ينطق ما تريد

 

اجعل الكمبيوتر الخاص بك ينطق ماتريد 

السلام عليكم ورحمة الله وبركاته

اقدم لكم اليوم طريقة ظريفة وجديدة :) لجعل الكمبيوتر ينطق اى كلمة تريدها ^_^

فقط

افتح برنامج الـ Notepad

ثم ضع هذا الكود

Dim userInput

userInput = InputBox("Write your message  here")


Set Sapi = Wscript.CreateObject("SAPI.SpVoice")

Sapi.speak userInput

 

ثم احفظ الملف بامتداد .vbs

مثلا

hesham.vbs

ثم نقوم بتشغيل الملف ستظهر لنا نافذة 

اكتب الجملة التي تريدها ثم نضغط على موافق Ok وسوف تسمع

الكمبيوتر ينطق الجملة التي كتبتها:)

لتحميل مثال 

من هنا 

 

و

السلام عليكم ورحمة الله وبركاته