الحلقة الخامسة : تحدث مثل أنونيموس وأبهر أصدقائك

السلام عليكم ورحمة الله وبركاته

اليوم ان شاء الله سوف يكون الشرح عن كيف تتحدث مثل أنونيموس عن طريقة بريمج صغير تقوم بإنشائه بكود بسيط عن طريق النوت باد 

الكود المستخدم بالشرح .. 

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")

sapi.Speak message

رابط الشرح .....