هل ترغب في الاستماع لنطق بعض الكلمات أو الجمل من الكمبيوتر؟؟؟

إليك حل بسيط جداً بإمكانك تنفيذه على جهازك, كالتالي :

1- من القائمة "إبدأ" افتح المفكرة notepad
2- اكتب المقطع البرمجي التالي في المفكرة (نسخ ولصق) :

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

3- أحفظ الملف على سطح المكتب بإسم speak.vbs
4- افتح الملف وأكتب أي كلمة أو جملة بالانكليزية, واستمع للنطق من الكمبيوتر مباشرةً.

إذا لم تفلح في عمل الملف يمكنك النقر على الرابط التالي لتنزيله من موقعنا : الرابط