الأكسس أيضا يتكلم

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

إلى المبرمجين و المحترفين بالأكسس، شدني في قسم الفيجوال بيسيك موضوع حول تصميم برنامج يتم التحكم به بواسطة الصوت أي يتلقى الأوامر شفويا بدلا من استخدام الماوس للنقر على سبيل المثال زر الأمر طباعة تقرير يكفي ذكر اسم التقرير بعد كلمة أمر "طباعة" أي نقول عبر الميكروفون "طباعة...كشف الحضور و الإنصراف" أو "معاينة...كشف الحضور و الإنصراف" بعدها يتم تنفيذ الأمر.

و هذه وصلة الموضوع في قسم الفيجوال بيسيك

/index.php?showtopic=73120&view=findpost&p=370065&hl=SpeechSDK51&fromsearch=1

المطلوب تفضلا منكم، تقديم برنامج مصمم بالاكسس بما ذكر أعلاه مع شرح كيفية التصميم خطوة بخطوة، كإهداء لباقي أعضاء منتدانا الغالي لتعميم الفائدة على الجميع.

و هذا الملف (SpeechSDK51.exe) هي الأداة المفروض تنزيلها على نظام التشغيل و للحصول عليها :

http://www.microsoft.com/downloads/details.aspx?FamilyID=5e86ec97-40a7-453f-b0ee-6583171b4530&DisplayLang=en

و أيضاً أكتب لكم الـكود كما حصلت عليه من النت:

Function speech (str As string)
Dim objVo As Object
set objVo = CreateObject ("SAPI.SpVoice")
objVo.speak str
End Function

ولستدعاء الموديل اعلاه:

Speech ("Tech tips is a wonderful site!")

هذه أول مرة أستخدم فيها أداة (إدراج كود) أرجوا أن يكون ما كتب واضحا... و شكرا