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

تفريغ الحقول في اكسس


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

سلام عليكم

ممكن كود تفريغ الحقل في مربع بحث اي بدون تحديد الكلمة و حذفها اريد ان اقوم بضغط على زر يحذفها و اقوم بإدخال كلمة اخرى للبحث

انا جربت فكرة اضافة سجل جديد ولكن لا تشتغل عندما اقوم بمنع اضافة سجل جديد من الخصائص 

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

على فرض ان اسم مربع النص الخاص بالبحث Txt_Search :

في حدث عند النقر اكتب هذا السطر

Me.Txt_Search = ""
Me.Txt_Search.Setfocus

السطر الثاني لإعادة التركيز ( وضع المؤشر ) في مربع البحث.

تم تعديل بواسطه Foksh
  • Like 2
رابط هذا التعليق
شارك

وعليكم السلام 🙂

مشاركة مع اخوي @Foksh 🙂

 

هذا كود تفريغ حقل البحث، اذا كان النقر على زر البحث:

Me.Txt_Search = ""
او
Me.Txt_Search = Null
او
Me.Txt_Search = Empty

ثم
Me.Txt_Search.Setfocus

.

اما اذا لم يوجد زر بحث، وكان الكود يعمل البحث على حدث "بعد التحديث" لحقل البحث ، فيجب ان ننقل التركيز على اي كائن في الموذج يقبل التركيز، ثم نستعمل الكود اعلاه ، هكذا مثلا:

دائما في نماذجي عندي زر لغلق النموذج اسمه
cmd_close
فعليه يصبح الكود:


me.cmd_close.setfocus

Me.Txt_Search = ""
او
Me.Txt_Search = Null
او
Me.Txt_Search = Empty

ثم
Me.Txt_Search.Setfocus

.

جعفر

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

27 دقائق مضت, jjafferr said:

وعليكم السلام 🙂

مشاركة مع اخوي @Foksh 🙂

 

هذا كود تفريغ حقل البحث، اذا كان النقر على زر البحث:

Me.Txt_Search = ""
او
Me.Txt_Search = Null
او
Me.Txt_Search = Empty

ثم
Me.Txt_Search.Setfocus

.

اما اذا لم يوجد زر بحث، وكان الكود يعمل البحث على حدث "بعد التحديث" لحقل البحث ، فيجب ان ننقل التركيز على اي كائن في الموذج يقبل التركيز، ثم نستعمل الكود اعلاه ، هكذا مثلا:

دائما في نماذجي عندي زر لغلق النموذج اسمه
cmd_close
فعليه يصبح الكود:


me.cmd_close.setfocus

Me.Txt_Search = ""
او
Me.Txt_Search = Null
او
Me.Txt_Search = Empty

ثم
Me.Txt_Search.Setfocus

.

جعفر

 

معلمنا وأستاذنا الأستاذ @jjafferr ، أهلا وسهلاً بعودتك .. :wub:

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

9 ساعات مضت, jjafferr said:

هذا كود تفريغ حقل البحث، اذا كان النقر على زر البحث:

ماشاء الله استاذنا

السؤال كيف ينظر اكسس الي كل منهم

من تجربة بسيط وجدت ان "" لا يعتبر الاكسس ان الحقل فارغ

بينما null و empty يكون الحقل فارغ فعلا

ويتضح ذلك ايضا عند محاولة عدد الحروف لكل من الثلاث خيارات

اخونا الشايب

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

من وجهة نظري وحسب فهمي لهذا الموضوع:-

"" يعتبرها آكسيس سلسلة فارغة ( فراغ ذو قيمة ) لكنه لا يعتبر قيمة .

Null يعتبرها آكسيس قيمة موجودة.

Empty يعتبرها آكسيس قيمة لم تأخذ قيمة كأن تكون فارغة "" أو Null .

كأن نقول لطالب :-

كم تفاحة في هذا الكيس ( مع عدم وجود كيس ) الجواب ولا تفاحة.

كم تفاحة في هذا الكيس ( مع وجود كيس فارغ مغلق ) الجواب ولا تفاحة.

كم تفاحة في هذا الكيس ( مع وجود كيس فارغ مفتوح ) الجواب ولا تفاحة.

 

يا رب ما أكون صعبتها بدل ما أسهلها 🤣

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

50 دقائق مضت, Eng.Qassim said:

سؤال مهم وربما يسبب مشاكل في بعض الاحيان

يا هلا استاذ قاسم وكل عام وانتم بخير

وسوف احمل المرفق

34 دقائق مضت, Foksh said:

يا رب ما أكون صعبتها بدل ما أسهلها 🤣

يا هلا استاذنا وكل عام وانتم بخير

الحقيقة ان الاولى يعدها اكسس 0

اما البقية فلا يعدها اكسس ونحتاج عند عد احرف الحقل الى استخدام nz حتى لا نحصل على رسالة خطأ

الحقيقة ان ⬇️

3 ساعات مضت, شايب said:

السؤال كيف ينظر اكسس الي كل منهم

مجرد تفكير بصوت مرتفع

ومع ذلك اعتز بمداخلتكما

اخونا الشايب

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

القيمة Null هي قيمة غير معروفة أو مفقودة لذلك نستخدم معها الدالة Null Zero (nz) لتعود لنا بقيمة معلومة يتم تحديدها أو كما تفضلت بالقيمة "" والتي قد تساوي 0 .

 

اما Empty  فهي باعتقادي للدلالة على متغير لم يتم تحديد قيمته ( الكيس الفارغ المفتوح ) أي قيمة قابلة للتغيير .

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

حسب علمي أن المتغيرات من نوع string لا تقبل القيمة Null بل تقبل القيمة "" .. ولا أدري إن كان ذلك ينطبق على الحقول النصية في الجدول أيضا ..

Null تقبلها المتغيرات من نوع var 

Empty تقبلها المتغيرات من نوع object

🙂

 

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

السلام عليكم ، شبابكم وشيابكم 🙂

 

اسمحوا لي ان ادلو بدلوي:

بما ان الاكسس عبارة عن 3 برامج مدمجة في برنامج واحد: واجهة الاكسس وكائناته ، جداول الاكسس ، وبرمجة VBA ،

فالنقاش اعلاه يخلط بينهم.

 

وطريقة معرفة طول حرف بيانات الحقل:

وبدلا عن استعمال مجموعة اوامر لمعرفة اذا الحقل 
به معلومة
او Null
او ""
او Empty

استعمل سطر واحد
if len(me.txt & "")=0 then

 

وهنا شرحت موضوع الـ NULL 

 

 

جعفر

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

4 ساعات مضت, jjafferr said:

فالنقاش اعلاه يخلط بينهم

:wallbash:

 

4 ساعات مضت, jjafferr said:
وبدلا عن استعمال مجموعة اوامر لمعرفة اذا الحقل 
به معلومة
او Null
او ""
او Empty

استعمل سطر واحد
if len(me.txt & "")=0 then

صحيح يعطي نتيجة صحيحة

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

لذا ⬇️

15 ساعات مضت, شايب said:

الحقيقة ان الاولى يعدها اكسس 0

اما البقية فلا يعدها اكسس ونحتاج عند عد احرف الحقل الى استخدام nz حتى لا نحصل على رسالة خطأ

اخونا الشايب

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

26 دقائق مضت, شايب said:

الحقيقة ان الاولى يعدها اكسس 0

اما البقية فلا يعدها اكسس ونحتاج عند عد احرف الحقل الى استخدام nz حتى لا نحصل على رسالة خطأ

وهنا بيت القصيد في المعادلة التي طرحتها ، فهي معادلة واحدة تفي للأحتمالين 🙂

 

جعفر

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

منذ ساعه, jjafferr said:

وهنا بيت القصيد في المعادلة التي طرحتها ، فهي معادلة واحدة تفي للأحتمالين 🙂

ربما اخذ الموضوع اكبر مما يستحق

ولكن "" لا تعني ان الحقل فارع وانما يحتوي سلسلة ذات طول صفري

ولتاكيد ذلك نغير خصائص الحقل الى السماح بطول صفري = لا

عندها لو اردنا استخدام ⬇️

في 6‏/4‏/2024 at 14:21, jjafferr said:
Me.Txt_Search = ""
او
Me.Txt_Search = Null
او
Me.Txt_Search = Empty

فسوف نحصل على رسالة خطأ في "" وكذلك empty

اما الخيار الاوسط null فسوف يعمل

اخونا الشايب

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

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

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



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

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

Important Information