اذهب الي المحتوي
أوفيسنا

استخدام داله if اكثر من مره


إذهب إلى أفضل إجابة Solved by ابو البشر,

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

  • أفضل إجابة
منذ ساعه, heshammahmoud0100 said:

محتاج استخدم داله if 

عندي الحقل hb قيمته لو من 10 الي 16 يكتب normal ف الحقل rb 

ولو اكبر من 16 يكتب up 

ولو اقل من 10 يكتب down

تفضل .................

Private Sub Hb_AfterUpdate()
Me.rb = IIf([Hb] >= 10 And [Hb] <= 16, "normal", IIf([Hb] > 16, "up", "down"))
End Sub

 

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

ومشاركة واثراء للموضوع ازيدكم من الشعر بيتا لماذا دائما نتجاهل استخدام دالة  Switch و اول ما يشغل بالنا هو دائما دالة iif
استخدام Switch انا احبه وافضله عن استخدام دالة iif 

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

ممكن استخدام الكود االتالى

' Sets rb to "normal" if Hb is between 10 and 16 (inclusive).
' Sets rb to "up" if Hb is greater than 16.
' Sets rb to "down" if Hb is less than 10.
' Sets rb to "" if Hb is blank.

Me.rb = Switch( _
                [Hb] >= 10 And [Hb] <= 16, "normal", _
                [Hb] > 16, "up", _
                [Hb] < 10, "down", _
                [Hb] = "", "" _
              )

طبعا انا قمت بكتابته على هذا النحو للتوضيح
 

ممكن كتابته بالشكل التالى
 

Me.rb = Switch([Hb] >= 10 And [Hb] <= 16, "normal", [Hb] > 16, "up", [Hb] < 10, "down", [Hb] = "", "")

 

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

 u Need Add Table Name.(IFF)

Switch : شرط واحد متنوع 

IFF : شروط متنوعة 

تستخدم في الاستعلام 

تستخدم في الدوال

تسخدم في النماذج والحقول 

================

dim rung as integer

for rung = 1 To Total 

Dlookup (IFF)

Next 

=====================

Dlookup (IFF)

Loop

======================

Dlookup (IFF)

Qury With Function (Change And Add . IFF)

======================

 يوجد حد لعدد الشروط IFF بالواحد

3 hours ago, ابو جودي said:
Me.rb = Switch( _
                [Hb] >= 10 And [Hb] <= 16, "normal", _
                [Hb] > 16, "up", _
                [Hb] < 10, "down", _
                [Hb] = "", "" _
              )

( _ ) لسطر الجديد

IFF(DlookuP("[@ابو جودي]","[Love_Live]")=-1, _

"كامل الاجماليات" _

Form_Function.Suport = -1" _

IFF(DCount("[ @Moosak]","[Developer]")=10,000.000 , _

DlookUP("[Soft]","[ActivX]" , "[Toolbar] = 'Drag_Button' ") =-1 , _

DlookUP("[Soft]","[ActivX]" , "[ @Foksh] = 'Drag_Button' ") =-1 , _

)

=================================

هل يوجد دالة تحفظ قيمة متغير في

Function _

Module

للاستعمال تغيرات حتى ب

IFF _

Switch ()

او حتى

Module.Function = DOA = set(tablet0) 

Any Open Form.Name Or Report.name _

Check Dlookup One tablet1 IF _

Sand : Add(tablet2) Or Change(tablet0)

All Time (Open Function)

Thank U 

شكرا 😇

تم تعديل بواسطه hanan_ms
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

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



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

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

Important Information