كيف تجعل حاسوبك ينطق بما تريد !

كيف تجعل حاسوبك ينطق بما تريد !

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

1 – اولا  نفتح برنامج المفكرة Notepad وقم بلصق الكود التالي فيه :

Dim msg, sapi

2	msg=InputBox("Enter your text ","By Mohamed baklola")

3	Set sapi=CreateObject("sapi.spvoice")

4	sapi.Speak msg

baklola.vbs قم بحفظ الملف بإسم 

والان قم بتشغيل الملف من الايقونة الموضحة بالصورة

OK وقم بكتابة ما تريد ان ينطقه الكمبيوتر واضغط 

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

الشرح بالفيديو: