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

[Rawannnna]

السلام عليكم

 

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

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

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

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

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

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

 

 

 

[محمدنجار]

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 هو كائن حالة البحث ... بالتوفيق       :::يمكن ارفاق مثال عند تعذر التطبيق

تم تعديل مايو 7, 2017 بواسطه محمدنجار

[Rawannnna]

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

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

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

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

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

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

Research status = "Approve

 

 

 

 

 

 

 

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

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

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

 

‏‏‏‏DBSystem -100.part0000001.rar

تم تعديل مايو 7, 2017 بواسطه 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

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

تم تعديل مايو 7, 2017 بواسطه محمدنجار

[Rawannnna]

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