اجعل جهازك ينطق ما تكتب طريقه سهله تخلى كمبيوترك يقول اللى انت بتكتبه ~ مدونة بلوشى

طريقه سهله جدا تجعل جهاز الكمبيوتر خاصتك يقول ما تكتبه بضغطه زر
ويمكنك الاستفاده من هذه الطريقه واستخدامه فى تعلم نطق الكلمات بالانجليزيه

    قم بفتح Notepad جديد.

* اضغط Start ...
* ثم All programs ...
* ثم Accessories
*ثم... Notepad.

    قم بنسخ الكود التالي فى الصفحه البضاء الفارغه التى ستظهر لك.

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

     انتبه يجب عليك حفظ الملف   بإسم

speak.vbs

صوره للبرنامج

الان كل ما عليك فعله هو الضغط علي رمز البرنامج علي سطح المكتب
واكتب ما تريد سماعه و اضغط علي .OK

ملحوظه: في بعض الاحيان لا يعمل البرنامج مع اللغه العربيه.

بلوشـــ انضموا لصفحتنـــا من هنا ـــى