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

السلام عليكم معنا اليوم طريقة ظريفة لجعل الكمبيوتر ينطق اي كلمة او جملة
تكتبتها ويعتبر هذا مفيد جدا لمن يريدون معرفة النطق الصحيحة لبعض الكلمات الانجليزية
اولا افتح برنامج ال Notepad

انسخ فيه هذا الكود التالي

Dim userInput

userInput = InputBox("Write your message  here")


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

Sapi.speak userInput

ثم احفظ الملف بامتداد .vbsعلى سبيل المثال
Ahmed.vbs

اضغط علي الصورة للتكبير

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



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