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

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

  • تمت الإجابة
قام بنشر
منذ ساعه, 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