السبت، 7 أبريل 2012

اصنع تطبيق يتكلم بما تبرمجه








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

اولا افتح النوتباد Notepad ثم اكتب هذا الكود

-----------------------------------------------

StrText = ("facebook")
Set Objvoice = CreateObject("SapI.Spvoice")
ObjVoice.Speak strText

----------------------------------------------

ثم احفظه باي اسم تريد لكن بامتداد VBS مثال app.VBS

ثم شغله واسمع الصوت يقول facebook

اذا اردت ان تغير الكلام احذف
facebook واكتب الكلام الذي تريده ولكن ضعه بين "" ليعمل

ليست هناك تعليقات:

إرسال تعليق