اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

استفسار حول زر الخيار OPTION


أبو عمر

الردود الموصى بها

الإخوة الأعزاء السلام عليكم ورحمة الله وبركاته

وبعد

استفساري حول زر الخيار option في البداية عملت نموذج باسم MM وعملت نموذج آخر وضعت فيه زر خيار OPTION باسم OPT1 وزر أمر باسم COM1 ما أريد عمله هو عندما يختار المستخدم على زر الخيار ويضغط على زر الأمر ينتقل البرنامج إلى نموذج MM

وكتبت في حدث عند النقر الكود التالي

IF OPT1.VALUE=TRUE THEN MM.SHOW

لكن ما أدري هذه الطريقة صحيحة أو لا ولكم الشكر الجزيل ؛؛؛؛؛؛؛

رابط هذا التعليق
شارك

اخي العزيز هذا العبارة الذي كتبته انت انه حسب رأي خطأ

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

مع حبي لكم

رابط هذا التعليق
شارك

اخي العزيز

فعلاً كودك صحيح لاني اعدت تصميم قاعدة البيانات من جديد وجربت الكود واشتغل

جزاك الف خير وجعله في موازين حسناتك وبارك فيك

اخي hemnf

هل يوجد كتاب معين لمثل هذه الأكواد أو موقع معين لاني بحثت كثيراً ولم أجد حتي في الكتب لان الموجود في الكتب اشياء نظرية وما فيها استخدام الأكواد

آسف على ازعاجك مجدداً

رابط هذا التعليق
شارك

بخصوص upload للملفات راجع قواعد المشاركة في المنتدي على الرابط التالي

http://www.officena.net/Tips/Questions.htm

يمكنك تحميل الملفات عن طريق موقع GeoCities او موقع جيران او غيرها من المواقع المجانية ووضع رابط التحميل في المنتدي ؛؛؛؛؛؛؛؛؛

ولك تحياتي

رابط هذا التعليق
شارك

عذرا على المداخلة ........

فى الحقيقة لا أدرى مدى صحةالكود السابق

If Opt1.Visible = True Then Form_MM.Visible = True
فهو لم يعمل معى ويولد رسالة خطأ Object Required وهذا خاص بالجزء الثانى من الجملة أما الجزء الأول فهو ينفذ الجزء الثانى فى حالة أن Opt1.Visable=true واعتقد ان المطلوب هو تنفيذ الجزء عندما يكون قد تم اختيار opt1 والتى يعبر عنها هكذا opt1.value=true واعتقد ان الجملة التى تؤدى الغرض هى كما يلى
Private Sub COM1_Click()
If Opt1.Value = True Then DoCmd.OpenForm "MM"
End Sub

رابط هذا التعليق
شارك

نعم الاستاذ السيد عبد العال على الحق

و انا اسف اخي ابو عمر الكود فيها نقص

العبارة

If Opt1.Value = True Then Form_MM.Visible = True
معنى هذه الكود Opt1.Value = True هو اذا اختار Opt1 تعمل و تفتح الفورم الثاني و اذا كان الكود بهذا الطريقة
If Opt1.value = false Then Form_MM.Visible = False
هذا الكود يغلق الفورم الثاني لكن هذا الكود
If Opt1.Visible = True Then Form_MM.Visible = True

و هذه العبارة فيها الخطأ Opt1.Visible = True

معناه هو

اذا كانت Opt1 موجود في هذا الفورم يعمل هذا و لست في حالة تحديده

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

و اذا عندك اي مشكلة انا بالخدمة مع المعلوماتي الضعيفة

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

وانا ابحث عند الموقع او كتبي لاكتب لك الكود

مع حبي لكم

و انا اسف لانه في الكود خطأ و شكرا لاستاذ السيد عبدالعال انا اشكره لمساعدتي في اصعب مشكلة

رابط هذا التعليق
شارك

آسف على ازعاجكم اخواني

فعلا إن الكود الأول يتنقل إلى الفورم mm باختيار أو بدون اختيار على زر opt1

والكود الثاني لابد من اختيار opt1 حتى ينتقل الى الفورم mm

ولكم تحياتي وجزاكم الله خيراً

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information