كيف أجعل حقل معين يعمل بناء على بيانات حقل آخر

[tchad3000]

أرجو المساعد في الآتي

لدى حقل في نموذج أريد أن يكون غير مفعل . فقط يعتمد تفعليه على أختيار قيمة واحدة فقط من حقل آخر .

ملاحظة: الحقل الآخر هو مربع تحرير وسرد (combo)

(أقصد بغير مفعل لا يمكن إدخال بيانات به )

وجزاكم الله خير جزاء

[التقني]

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

لنفرض أنه لديك حقلين

حقل التحرير والسرد أسمه Status به القيمتان ( تنشيط الحقل ) و ( عدم تنشيط الحقل )

والآخر حقل عادي واسمه Gift

ضع الكود أدناه في حدث قبل التحديث للحقل Status

Private Sub Status_BeforeUpdate(Cancel As Integer)
 Select Case Status.Value
        Case Is = "تنشيط الحقل"
            Gift.Visible = True
        Case Is = "عدم تنشيط الحقل"
            Gift.Visible = False
        End Select

End Sub

مع ملاحظة أنه عند الحاجة الى عدم اظهار الحقل بعد تشغيل النموذج ضع الكود التالي في حدث التحميل للنموذج :

Private Sub Form_Load()
Gift.Visible = False
End Sub

جرب وأخبرنا بالنتيجة

تم تعديل نوفمبر 26, 2005 بواسطه التقني

[tchad3000]

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

[tchad3000]

أخي الكريم التقني

حاولت أن أعمل كما قلت لكن تطلع رسالة خطأ على كلمة visible كالآتي

method or data member not found

أرجو الرد وجزاك الله خيراً

[التقني]

أرفق مثالك ليطلع عليه الأخوة الأعضاء