السلام عليكم معنا اليوم طريقة ظريفة لجعل الكمبيوتر ينطق اي كلمة او جملة
تكتبتها ويعتبر هذا مفيد جدا لمن يريدون معرفة النطق الصحيحة لبعض الكلمات الانجليزية
اولا افتح برنامج ال Notepad
انسخ فيه هذا الكود التالي
Dim userInput
userInput = InputBox("Write your message here")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak userInput
اضغط علي الصورة للتكبير
Saad.vbs
| اضغط علي الصورة للتكبير |
| اضغط علي الصورة للتكبير |
ثم نقوم بتشغيل الملف سيظهر لنا نافذة كما في الصورة التالية:
اكتب الجملة التي تريدها ثم نضغط على موافق Ok وسوف تسمع
الكمبيوتر ينطق الجملة التي كتبتها.
ليست هناك تعليقات:
إرسال تعليق