عندي مشكلة في اطهار نافذة التحكم بمستوى الميكروفون....هل من مساعد؟؟؟

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

الاخوة رواد منتدى الفريق العربي للبرمجة اهلا وسهلا بكم

انا بصدد عمل برنامج تسجيل الصوت ووضعت في هذا البرنامج زر لاظهار التحكم بمستوى الصوت للميكرفون ومستوى الصوت للـ Stereo Mix كما هو موصح بالصورة التالية:

لكني في الحقيقة لم استطع فعل ذلك وقد حاولت وبحث في المنتديات ولم اصل لنتيجة مرضية، فلم استطع الا الى الوصول الى اظهار نافذة التحكم بالصوت من خلال الكود التالي:

Dim vol As Longvol = Shell("C:\WINDOWS\system32\sndvol32.exe", vbNormalFocus)

كما بالصورة التالية:

Resized to 76% (was 561 x 328) - Click image to enlarge

وكذلك استطعت اظهار نافذة اعدادات الصوت من خلال الكود التالي:

Dim vVar As Variant vVar = Shell("RunDll32.exe Shell32.dll,Control_RunDLL mmsys.cpl , 2", vbNormalFocus)

كما بالصورة التالية:

فالحقيقة ارجو من الاخوة خبرا الفيجول بيسك ان يفيدونا بما ليدهم من علم بارك الله فيهم وجزاهم الله خيرا.

سؤالى: اريد كود لاظهار نافدة التحكم بمستوى صوت الميكروفون و مستو الــ Stereo Mix كما بالشكل التالي:

بصراحة الموضوع منقول و لكن انا اواجه نفس المشكلة

حيث ايضا عندما استعمال الميكروفون اثناء المكالمة انا اسمع الشخص الاخر و لكن هو لا يسمعني

اريد مساعدتكم

تقبلوا مني اجمل تحية

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