هل ترغب في الاستماع لنطق بعض الكلمات أو الجمل من الكمبيوتر؟؟؟
إليك حل بسيط جداً بإمكانك تنفيذه على جهازك, كالتالي :
1- من القائمة "إبدأ" افتح المفكرة notepad
2- اكتب المقطع البرمجي التالي في المفكرة (نسخ ولصق) :
Dim Message، Speak
Message=InputBox("Enter text"،"Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
3- أحفظ الملف على سطح المكتب بإسم speak.vbs
4- افتح الملف وأكتب أي كلمة أو جملة بالانكليزية, واستمع للنطق من الكمبيوتر مباشرةً.
إذا لم تفلح في عمل الملف يمكنك النقر على الرابط التالي لتنزيله من موقعنا : الرابط