اصنع برنامج كلام واجعل حاسوبك يتكلم بالنوت باد

السؤال: هل يمكن للحاسوب أن يتكلم ؟وهل يمكن أن تجعله يتكلم ؟
الجواب: نعم يمكنك ذلك !!

بفضل النوت باد يمكنك جعل حاسوبك ينطق كل ما تكتبه بصنع برنامج صغير وبسيط بواسطة النوت باد
نبدأ:
1-افتح النوت باد
2-الصق  الكود

 Dim Message, Speak
          Message=InputBox("Enter text","Speak")
          Set Speak=CreateObject("sapi.spvoice")
          Speak.Speak Message
         

3-احفظ الملف ك speak.vbs

4-افتحه واكتب ما تشاء ودع الحاسب يتكلم 

الى اللقاء في التدوينة القادمة انشاء الله

أخوكم the-dz professional