الاثنين، 26 مارس 2012

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

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

   قم بفتح 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
ملحوظه: في بعض الاحيان لا يعمل البرنامج مع اللغه العربيه.

ليست هناك تعليقات:

إرسال تعليق