مدونة كومبيوترهوت

السلام عليكم معنا اليوم طريقة ظريفة لجعل الكمبيوتر ينطق اي كلمة او جملة

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

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

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

Dim userInput

userInput = InputBox("Write your message here")

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

Sapi.speak userInput

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

mynote.vbs

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

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

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

المصدر : مدونة كومبيوترهوت

المشاركات الشائعة