اخفاء حقول بالتقرير بناء على مربع تحرير وسرد

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

بما ان طريقة اخاء الحقول بالتقرير غير مجدية

قمت بعمل حقل جديد غير منظم بالنموذج عند اختيار نوع الاجراء ( استقالة او انهاء خدمات ) يقوم بنقل الرقم المطلوب للحقل

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

وعدد ايام الخدمة اقل عن 1800 اختار حقل exittotal1

وعدد الايام اكبرعن 1800 واقل من 3600 اختار حقل exittotal2

وعدد ايام الخدمة اكبر من 3600 اختار حقل exittotal3

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

If Me.TEX999.Text = "انهاء خدمات" Then
Me.nhaee = [exittotal3]

Else
If Me.TEX999.Text = "استقالة" Then
Me.nhaee = [exittotal1] = TEX15 < 1800
Me.nhaee = [exittotal2] = TEX15 > 1800 < 3600
Me.nhaee = [exittotal3] = TEX15 > 3600

End If
End If

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

mokafa.rar

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

جرب الكود ده

Select Case Me.TEX999

Case "انهاء خدمات"
Me.nhaee = [exittotal3]
   
Case "استقالة"
    Select Case Me.TEX15  
         Case Me.TEX15 < 1800  
        Me.nhaee = [exittotal1]  
        Case Me.TEX15 > 1800 And Me.TEX15 < 3600  
        Me.nhaee = [exittotal2]  
        Case Me.TEX15 < 3600  
        Me.nhaee = [exittotal3]  
End Select  

End Select

الاخ امير شكرا لتواجدك

اخي الفاضل قمت بوضع الكود في حدث بعد التحديث للحقل الاجراء

ويعمل فقط في حال اختيار انهاء الخدمات في حال الاستقاله لايعطي نتائج

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

امل المساعدة

mokafa.rar

-

mokafa.rar

المرفق يعمل بشكل جيد وهوا المطلوب تماماً

الله يجزاك بالخير والعافية ويعطيك طيلة العمر ياااااارب

مشكور اخوي امير