علي هندسة قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 السلام عليكم ورحمة الله وبركاته لدي كود يقوم باستدعاء مديول وعمل هذا المديول باعادة تغيير حرف او كلمة او رقم في حقل حسب ما مثبت بالايعاز . المشكلة لدي هي انه لايعمل لدي بالنسبه لسجل التاريخ ولا بالنسبة للحقول الفارفة . يرجى التعديل عليه ليقبل الحقول الفارغة وحقل التاريخ وشكرا الكود هو Function change_characters(str_Name As String) As String "(str_Name = Replace(str_Name, "1", "2 change_characters = str_Name End Function حيث ان الرقم "1" يمثل الرقم القديم و "2" يمثل الرقم الجديد
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 هل تريد الاستبدال كما هو يبقى ؟ يبحث عن الرقم 1 ويستبدله بالرقم اثنان سواء كان المدخل تاريخ, رقم, نص.. الخ ؟
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 13:59, SEMO.Pa3x said: هل تريد الاستبدال كما هو يبقى ؟ يبحث عن الرقم 1 ويستبدله بالرقم اثنان سواء كان المدخل تاريخ, رقم, نص.. الخ ؟ Expand نعم اريده ان يستبد الحقل وان كان فارغ وحقل التاريخ ايظا
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 في 16/4/2019 at 14:37, علي هندسة said: نعم اريده ان يستبد الحقل وان كان فارغ وحقل التاريخ ايظا Expand Function change_characters(str_Name As String) As String str_Name = Replace(str_Name, "1", "2") change_characters = str_Name End Function الاستدعاء كالاتي, لنفرض انك تريد عرض الناتج في MsgBox MsgBox change_characters(Nz(x)) حيث x هو النص او الرقم او التاريخ الذي تريد استبداله او اسم حقل النص حسنين
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 14:49, SEMO.Pa3x said: حيث x هو النص او الرقم او التاريخ الذي تريد استبداله او اسم حقل النص Expand استاذي الفاضل SEMO.Pa3x ما احتاجه هو تعديل الحقل بالكامل كان يكون فيه ارقام او احرف او فارغ فيقوم باستبداله بكلمة او رقم محدد وشكرا
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 (معدل) في 16/4/2019 at 15:54, علي هندسة said: استاذي الفاضل SEMO.Pa3x ما احتاجه هو تعديل الحقل بالكامل كان يكون فيه ارقام او احرف او فارغ فيقوم باستبداله بكلمة او رقم محدد وشكرا Expand تفضل اسم الحقل = change_characters(Nz([اسم الحقل])) مثل كأن يكون اسم الحقل txt_fullName txt_fullName = change_characters(Nz([txt_fullName])) تم تعديل أبريل 16, 2019 بواسطه SEMO.Pa3x
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 16:01, SEMO.Pa3x said: تفضل اسم الحقل = change_characters(Nz([اسم الحقل])) مثل كأن يكون اسم الحقل txt_fullName txt_fullName = change_characters(Nz([txt_fullName])) Expand اسف استاذي الفاضل لم استطع تطبيق المثال اعلاه هل يمكن مساعدتي اكثر وشكرا
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 في 16/4/2019 at 17:01, علي هندسة said: اسف استاذي الفاضل لم استطع تطبيق المثال اعلاه هل يمكن مساعدتي اكثر وشكرا Expand ارفق قاعدتك حتى اعدلها لك
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 18:58, SEMO.Pa3x said: ارفق قاعدتك حتى اعدلها لك Expand تفضل استاذ SEMO.Pa3x examp 2.accdbFetching info...
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 اريد ان يتم تغيير حتى الحقول الفارغة! ماذا تقصد ؟؟؟
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 20:48, SEMO.Pa3x said: اريد ان يتم تغيير حتى الحقول الفارغة! ماذا تقصد ؟؟؟ Expand يعني عند الضغط على زر تغيير التاريخ يتم تغيير التاريخ الى يوم محدد لجميع تواريخ الحقل او العمود حتى لو كانت التواريخ مختلفة او فارغه بدون تاريخ يعني تغيير للكل بغض النظر عن هنالك تاريخ او لا او اختلاف التواريخ وشكرا
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 في 16/4/2019 at 20:53, علي هندسة said: يعني عند الضغط على زر تغيير التاريخ يتم تغيير التاريخ الى يوم محدد لجميع تواريخ الحقل او العمود حتى لو كانت التواريخ مختلفة او فارغه بدون تاريخ يعني تغيير للكل بغض النظر عن هنالك تاريخ او لا او اختلاف التواريخ وشكرا Expand حسناً, جرب وأخبرني النتيجة. examp 21_semo.accdbFetching info...
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 20:55, SEMO.Pa3x said: حسناً, جرب وأخبرني النتيجة. Expand تمام استاذي الفاضل وهو المطلوب ولكن يقوم بتغيير التاريخ الى تاريخ اليوم وانا اريد ان يتم تحديد يوم معين كان يكون بعد سنه او قبل سنه
SEMO.Pa3x قام بنشر أبريل 16, 2019 قام بنشر أبريل 16, 2019 في 16/4/2019 at 21:11, علي هندسة said: تمام استاذي الفاضل وهو المطلوب ولكن يقوم بتغيير التاريخ الى تاريخ اليوم وانا اريد ان يتم تحديد يوم معين كان يكون بعد سنه او قبل سنه Expand جرب الان examp 21_semo.accdbFetching info...
علي هندسة قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 في 16/4/2019 at 21:19, SEMO.Pa3x said: جرب الان Expand عفوا استاذي لم يعمل الملف لدي فعند الضغط على تغيير التاريخ يطلب مني ادخال تاريخ وكما في الصورة الاولى المرفقة فاذا غيرت التاريخ او ابقيته تضهر لي رسالة خطأ وكما بالصورة الثانية المرفقة وتضهر لي رسالة خطأ
SEMO.Pa3x قام بنشر أبريل 17, 2019 قام بنشر أبريل 17, 2019 (معدل) examp 21_semo.accdbFetching info... تم تعديل أبريل 17, 2019 بواسطه SEMO.Pa3x 1
علي هندسة قام بنشر أبريل 17, 2019 الكاتب قام بنشر أبريل 17, 2019 في 17/4/2019 at 02:35, SEMO.Pa3x said: examp 21_semo.accdb Expand شكرا استاذنا الفاضل SEMO.Pa3x المحترم وهو المطلوب
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.