بالفيديو والشرح - طريقة تمكنكم من جعل الكمبيوتر يلفظ ما تكتبونه .

بالفيديو والشرح - طريقة  تمكنكم من جعل الكمبيوتر يلفظ ما تكتبونه .



الخطوات
1- قم بفتح Bloc-notes  (نذهب إلى المكتب و نضغط على زر الفأرة الأيمن تم نختار Nouveaux ... ثم  Bloc-notes )  هكذا :



 2- قم الأن بنسخ هذا الكود ب Bloc-notes .

الكود هو :
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message


3- إحفظ الملف بإسم : speak.vbs
( إضغط على : enregistre sous .... fichier ونكتب في إسمه speak.vbs)
 هكذا :


4- الأن كل ما عليك فعله هو الضغط على رمز ( icone ) البرنامج على سطح المكتب هكذا :



 وأكتب ما تريد سماعه و إضغط على OK .

تابع الشرح بالفيديو


للمزيد من البرامج من هنا

محول الاكوادإخفاء الابتساماتإخفاء ركن الاسئلنة

:)
:(
=(
^_^
:D
=D
=)D
|o|
@@,
;)
:-bd
:-d
:p
:ng
:lv
شكرا لتعليقك