اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اخفاء نموذج فرعي واظهاره بشرط


Rawannnna

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

السلام عليكم

 

عندي نموذج اسمه Current Research 

اول ما ادخل عليه ابغا الاستعلام والاطار اللي تحت يكونوا مخفيين

واذا دخل المستخدم رقم البحث وكانت حالة البحث = Approve  يظهر الاستعلام والاطار اللي تحت

واذا كانت حالة البحث لا تساوي Approve  تظهر رسالة منع للمستخدم

سويت استعلام Query5  وحطيت عند حالة البحث = Approve

وحطيت على زر التحكم هذا الكود ومازبط

 

590eb1cfcb37d_.png.ce3589aeb204084a2a5e989c6a1efd34.png

 

 

590eb1e30b34c_.png.09f12b83717d7aaf6cb3e6c91e4fc627.png

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

44 دقائق مضت, Rawannnna said:

اعندي نموذج اسمه Current Research 

اول ما ادخل عليه ابغا الاستعلام والاطار اللي تحت يكونوا مخفيين

واذا دخل المستخدم رقم البحث وكانت حالة البحث = Approve  يظهر الاستعلام والاطار اللي تحت

واذا كانت حالة البحث لا تساوي Approve  تظهر رسالة منع للمستخدم

سويت استعلام Query5  وحطيت عند حالة البحث = Approve

وحطيت على زر التحكم هذا الكود ومازبط

::: اولا عند الفنح للنموذج Current Research يجب ان تكون االكائنات مخفية(الاستعلام والاطار) من خصائص النموذج .

::: بعدها نكتب الجملة الشرطية اذا كانت حالة البحث = Approve .

if me.Searchcase = "approve" then
me.Query5.visible=true
else
me.Query5.visible=false
endif

::: Searchcase هو كائن حالة البحث ... بالتوفيق       :::يمكن ارفاق مثال عند تعذر التطبيق

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

44 دقائق مضت, محمدنجار said:

::: اولا عند الفنح للنموذج Current Research يجب ان تكون االكائنات مخفية(الاستعلام والاطار) من خصائص النموذج .

::: بعدها نكتب الجملة الشرطية اذا كانت حالة البحث = Approve .


if me.Searchcase = "approve" then
me.Query5.visible=true
else
me.Query5.visible=false
endif

::: Searchcase هو كائن حالة البحث ... بالتوفيق       :::يمكن ارفاق مثال عند تعذر التطبيق

حالة البحث داخل النموذج المتعدد للاستعلام

Research status = "Approve

 

590ec2ba3e8af_.png.68339e8497368cf6bfd8b3c3cf8416fd.png

 

 

 

590ec3011851b_2.png.337be4d21ad07a8d3725488ca0e4bb6d.png

 

 

 

طيب أستاذ محمد النجار لو بس يكون الاطار مخفي كيف حيكون الكود

والاستعلام ظاهر لكن لو وضع رقم بحث وحالته لا تساوي Approve يعطي رسالة حالة البحث غير متاحة

واذا كان رقم البحث حالته تساوي Approve يفتح الاطار اللي تحت

 

‏‏‏‏DBSystem -100.part0000001.rar

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

26 دقائق مضت, Rawannnna said:

حالة البحث داخل النموذج المتعدد للاستعلام

Research status = "Approve

لو بس يكون الاطار مخفي كيف حيكون الكود

والاستعلام ظاهر لكن لو وضع رقم بحث وحالته لا تساوي Approve يعطي رسالة حالة البحث غير متاحة

واذا كان رقم البحث حالته تساوي Approve يفتح الاطار اللي تحت

::: searchcase أقصد بها اسم مربع البحث

::: عندها ستصبح الجملة الشرطية :

if me.Research_ID = "approve" then
me.Query5.visible=true
else
msgbox "Search Not Avaliable"
me.Query5.visible=false
endif

::: اما موضوع اخفاء واضهار الكائنات فيمكن وضع ما نشاء من كائنات وكيفما نشاء على طرفي الجملة الشرطية. بمعنى ان تحقق الشرط اضهر هذه الكائنات والا اي عدم تحقق الشرط ابقها مخفية ...

تم تعديل بواسطه محمدنجار
  • Like 1
رابط هذا التعليق
شارك

5 ساعات مضت, محمدنجار said:

::: searchcase أقصد بها اسم مربع البحث

::: عندها ستصبح الجملة الشرطية :


if me.Research_ID = "approve" then
me.Query5.visible=true
else
msgbox "Search Not Avaliable"
me.Query5.visible=false
endif

::: اما موضوع اخفاء واضهار الكائنات فيمكن وضع ما نشاء من كائنات وكيفما نشاء على طرفي الجملة الشرطية. بمعنى ان تحقق الشرط اضهر هذه الكائنات والا اي عدم تحقق الشرط ابقها مخفية ...

 

 

شكرا أستاذ محمد تم حل المشكلة

بوضع هذا الكود

 

 

DoCmd.Requery
If [Research_ID] = [d1] Then
Query5.Visible = True
frame.Visible = True
Else
frame.Visible = False
Query5.Visible = False
MsgBox "please note that you should follow up with finaicial affairs(Mr.Mohammed siamek) to fill tou start using the system!! "
End If
End Sub

 

 

 

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

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

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



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

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

Important Information