كتابة ايعاز برمجي داخل ( BUTTON)

اخي الفاضل

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

هذا البرنامج يعتمد على عنصر تحكم اكتف اكس ActiveX

MSComDlg.CommonDialog

موجود على النموذج كل ما عليك هو استيراد النموذج الى برنامجك ونسخ هذا العنصر لديك وكذلك الكود المصاحب له الموجود تحت زر الامر Open Path مع مربع النص الخاص بمسار الملف وامر تشغيل الملف المختار

يجب ان تتأكد من ان المكتبات او المراجع References تكون بهذه الطريقة

كيف تصل للمكتبات او المراجع

كل ما عليك هو عرض النموذج في وضع التصميم ثم ضغط المفتاحين ALT + F11 من لوحة المفاتيح وسيظهر لك محرر الفيجول بيسك للتطبيقات ومن ثم اختر من القوائم TOOLS ثم References وقم بالتأشير على المكتبات المطلوبه

OpenAndRun.rar

اختكم

زهره

الأخت زهرة رجاءً لم يفتح عندي الملف الذي ارسلتيه ارجو ارساله مرة اخرى

اخي الفاضل البرنامج يعمل بشكل جيد

قد يكون السبب هو انه لا يوجد لديك برنامج WIN RAR لان البرنامج تم ضغطه به

لكن لا مشكله هذا البرنامج مره ثانية مضغوط ببرنامج WINZIP

OpenAndRun.zip

شكراً جزيلآ لك يا أخت زهراء

( خير الناس من نفع الناس )

الاخ زهزة نشكرك على المساعدة لهذا المنتدى

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

Dim dlBrowse As CommonDialog

فانه يطلب مني اضافة المكتبة المحدده لهذا الامر فارجوا التوضيح

اخي الفاضل

هل من الممكن ان تعيد قراءة المشاركة والشرح الذي في الصوره