تصميم برنامج بسيط لنطق الكلمات بالستخدام المفكرة

اولا نقوم بفتح المفكرة

ثم ننسخ الكود التالي الذي بالون الازرق

Dim userInput

userInput = InputBox("Write your message here")

Set Sapi = Wscript.CreateObject("SAPI.SpVoice")

Sapi.speak userInput

ثم احفظ الملف بامتداد .vbs على سبيل المثال       mastre.vbs

او شاهد الفديو