مساعده الله يجزاكم خير

[aiman7337 1]

اولا اشكر هاذا الموقع الجميل الذي افادنا كثيرا الف شكر

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

 

ElseIf tbvtac!halat = 1 Then                                                                                                                                                                     

        txt1].BackColor = RGB(255, 0, 0                                                                                                                                                              

        [asd].BackColor = RGB(255, 255, 0)                                                                                                                                                    

        If tbvtac!detaMO = Date Then __________________________________________________هاذا الشرط الاول         

            [txt1].ForeColor = 16777215                                                                                                                                                             

ElseIf tbvtac!amoResp >= tbvtac!presDay * tbvtac!totodays Then_______________________هاذا الشرط الثاني       

            [asd].BackColor = RGB(255, 0, 0)                                                                                                                                                    

ElseIf tbvtac!amoResp < tbvtac!presDay * tbvtac!totodays Then  ____________________________هاذا الشرط الثاني          

            [txt1].BackColor = 0                                                                                                                                                                            

     هل يوجد شرط يقوم بتشغيل الشرطين 

 

مستند نصي جديد ‫(2)‬.txt

تم تعديل 4 Jun 2016 بواسطه aiman7337
التنسيق

[aiman7337 1]

الحمد لله انحلت المشكله شكرا