تعديل كود

[النجاشي]

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

شو الطريقه لتعديل هذا الكود اذا كان مغادر يعطينا خط باللون الأحمر

واذا كان موجود لون بالخط الأخضر

If Me.mstagra = False Then
        Me.TERHEL = "غادر"
        Me.Requery
    Else
        Me.TERHEL = "موجود"
End If
Else
Me.mstagra = True
End If

شاكر لكم احبتي

[Shivan Rekany]

فی اسفل السطر اللي كتبت فیھا غادر اكتب

Me.TERHEL.BackColor = vbRed

وفی اسف السطر اللی کتبت موجود اکتب

Me.TERHEL.BackColor = vbGreen

 

[النجاشي]

13 دقائق مضت, Shivan Rekany said:

فی اسفل السطر اللي كتبت فیھا غادر اكتب

Me.TERHEL.BackColor = vbRed

وفی اسف السطر اللی کتبت موجود اکتب

Me.TERHEL.BackColor = vbGreen

 

استاذي  شفان بارك الله فيك وزادك الله علما

هذه القاعده لم استطيع الوصول لحل

الاحد.rar