salimboub24 قام بنشر مارس 30, 2019 قام بنشر مارس 30, 2019 السلام أريد في حقل قناع الادخال بحيث أريد قناع الادخال في الاكسس في الجدول عندما أكتب في بداية الكلمة حرف A أو حرف B او حرف C لايقبل ويقبل كتابة جميع الاحرف ماعد حرف A أو حرف B او حرف C في البداية
عبد اللطيف سلوم قام بنشر مارس 30, 2019 قام بنشر مارس 30, 2019 في 30/3/2019 at 10:05, salimboub24 said: السلام أريد في حقل قناع الادخال بحيث أريد قناع الادخال في الاكسس في الجدول عندما أكتب في بداية الكلمة حرف A أو حرف B او حرف C لايقبل ويقبل كتابة جميع الاحرف ماعد حرف A أو حرف B او حرف C في البداية Expand تفضل منع كتابة حروف.mdbFetching info...
salimboub24 قام بنشر مارس 31, 2019 الكاتب قام بنشر مارس 31, 2019 أريد معلومات حول قناع الادخال , مثلا عند كتابة جملة في حقل للجدول مثلا أكتب BR512Z1GX022540 بحيث ادا كانت هده الجملة تحتوي في البداية على حروف مكونة من BR5 لايقبل الحفظ أي تظهر لي رسالة بعدم الحفظ وادا كانت الجملة لاتبدا بحروف BR5 مثلا LXMTB2T5GG021 فانه يقبل تسجيل في الجدول ولدي ملف للتحميل وادا امكن أريد الحقل لايتعدى 17 حرف أو رقم وشكراااااا منع كتابة حروف (5).mdbFetching info...
ابوخليل قام بنشر مارس 31, 2019 قام بنشر مارس 31, 2019 السلام عليكم انا لا اعرف تطبيق فكرتك بواسطة قناع الادخال ولكن يمكن ان اساعدك بتنفيذ الفكرة باستخدام الكود عبر احداث مربع النص
salimboub24 قام بنشر مارس 31, 2019 الكاتب قام بنشر مارس 31, 2019 (معدل) في 31/3/2019 at 09:57, ابوخليل said: السلام عليكم انا لا اعرف تطبيق فكرتك بواسطة قناع الادخال ولكن يمكن ان اساعدك بتنفيذ الفكرة باستخدام الكود عبر احداث مربع النص Expand السلام عليك أخي انظر أسفل الصور لتفهم أكثر لاحظ في Valide si بحيث الكود يعبر عن السماح بكتابة جميع الاحرف في بداية الكلمة ماعدا A.B.C رسالة -- يمنع كتابة هدا الحرف -- ,انا أريده يمنع كتابة هدخ الاحرف أي ادا كتب في بداية الكلمة حرف d الى غاية حرف z يقبل وادا كتبت في بداية الكلمة حرف A أو B او C يقبل الحفظ لدا أريـد عند كتابة جملة مثل BR512Z1GX022540 بحيث ادا كانت هده الجملة تحتوي في البداية على حروف مكونة من BR5 لايقبل الحفظ أي تظهر لي رسالة بعدم الحفظ وادا كانت الجملة لاتبدا بحروف BR5 مثلا LXMTB2T5GG021 فانه يقبل الحفظ البرنامج للتحميل اسفله منع كتابة حروف (5).mdbFetching info... تم تعديل مارس 31, 2019 بواسطه salimboub24
ابوخليل قام بنشر مارس 31, 2019 قام بنشر مارس 31, 2019 في 31/3/2019 at 12:28, salimboub24 said: السلام عليك أخي انظر أسفل الصور لتفهم أكثر Expand مطلوبك مفهوم رعاك الله ايضا تريد الارقام والحروف ان لا تزيد عن 17 ولتفهم عزيزي ان الحقل الظاهر في الصورة يسمى : قاعدة التحقق من الصحة وليس قناع ادخال المهم انا سألتك ان كنت تريد تطبيق الضوابط حسب طلبك بغض النظر عن الوسيطة ولكن يبدوا انك لم تفهم ما اقصده ؟ وعلى كل حال واختصارا للوقت هذا الكود يحقق مطلبك : Dim z As String Dim i As Integer i = Len(Me.text1) z = Left(Me.text1, 3) '++++++++++++++++++++++++++++++ If i > 17 Or z = "BR5" Then Undo MsgBox "تأكد من ادخال البيانات بطريقة صحيحة" Exit Sub End If وهذا تطبيق : منع كتابة حروف2 .mdbFetching info... 1
ابو ياسين المشولي قام بنشر مارس 31, 2019 قام بنشر مارس 31, 2019 في 31/3/2019 at 13:55, ابوخليل said: مطلوبك مفهوم رعاك الله ايضا تريد الارقام والحروف ان لا تزيد عن 17 ولتفهم عزيزي ان الحقل الظاهر في الصورة يسمى : قاعدة التحقق من الصحة وليس قناع ادخال المهم انا سألتك ان كنت تريد تطبيق الضوابط حسب طلبك بغض النظر عن الوسيطة ولكن يبدوا انك لم تفهم ما اقصده ؟ وعلى كل حال واختصارا للوقت هذا الكود يحقق مطلبك : Dim z As String Dim i As Integer i = Len(Me.text1) z = Left(Me.text1, 3) '++++++++++++++++++++++++++++++ If i > 17 Or z = "BR5" Then Undo MsgBox "تأكد من ادخال البيانات بطريقة صحيحة" Exit Sub End If وهذا تطبيق : منع كتابة حروف2 .mdb 252 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 2 downloads Expand اجابه في الصميم استاذي ابو خليل بارك الله فيك 1
salimboub24 قام بنشر مارس 31, 2019 الكاتب قام بنشر مارس 31, 2019 (معدل) شكرا لك أخي كثيرا كثيرا كثيرا كثيرا كثيرا ورحم الله والديك وأدخلهم الجنة ان شاء الله وادا اردت أيضا اضافة احرف أخرين "BR5" و "BR3" و "BR4" تم تعديل مارس 31, 2019 بواسطه salimboub24 1
ابوخليل قام بنشر مارس 31, 2019 قام بنشر مارس 31, 2019 شرفت بمرورك ابو ياسين طريقة وضع الشرط في حدث مربع النص افضل لا شك فيما لو اردنا التحكم بالضوابط ونريد ان نجعل مربع النص اكثر مرونة فمثلا يمكن ان نستدعي هذه القيم من جدول If i > 17 Or z = "BR5" Then 1
salimboub24 قام بنشر مارس 31, 2019 الكاتب قام بنشر مارس 31, 2019 في 31/3/2019 at 13:55, ابوخليل said: مطلوبك مفهوم رعاك الله ايضا تريد الارقام والحروف ان لا تزيد عن 17 ولتفهم عزيزي ان الحقل الظاهر في الصورة يسمى : قاعدة التحقق من الصحة وليس قناع ادخال المهم انا سألتك ان كنت تريد تطبيق الضوابط حسب طلبك بغض النظر عن الوسيطة ولكن يبدوا انك لم تفهم ما اقصده ؟ وعلى كل حال واختصارا للوقت هذا الكود يحقق مطلبك : Dim z As String Dim i As Integer i = Len(Me.text1) z = Left(Me.text1, 3) '++++++++++++++++++++++++++++++ If i > 17 Or z = "BR5" Then Undo MsgBox "تأكد من ادخال البيانات بطريقة صحيحة" Exit Sub End If وهذا تطبيق : منع كتابة حروف2 .mdb 252 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 0 downloads Expand وادا اردت أيضا اضافة احرف أخرين "BR5" و "BR3" و "BR4"
ابو ياسين المشولي قام بنشر مارس 31, 2019 قام بنشر مارس 31, 2019 في 31/3/2019 at 14:48, ابوخليل said: شرفت بمرورك ابو ياسين طريقة وضع الشرط في حدث مربع النص افضل لا شك فيما لو اردنا التحكم بالضوابط ونريد ان نجعل مربع النص اكثر مرونة فمثلا يمكن ان نستدعي هذه القيم من جدول If i > 17 Or z = "BR5" Then Expand والله استاذي بالنسبه للجدول انتم لها الاخ salimboub24 ممكن يكون هكذا If i > 17 Or z = "BR3" Or z = "BR44" Or z = "BR5" Then
salimboub24 قام بنشر أبريل 1, 2019 الكاتب قام بنشر أبريل 1, 2019 في 31/3/2019 at 14:47, salimboub24 said: شكرا لك أخي كثيرا كثيرا كثيرا كثيرا كثيرا ورحم الله والديك وأدخلهم الجنة ان شاء الله وادا اردت أيضا اضافة احرف أخرين "BR5" و "BR3" و "BR4" Expand في 31/3/2019 at 15:07, salimboub24 said: وادا اردت أيضا اضافة احرف أخرين "BR5" و "BR3" و "BR4" Expand اخي أو مثلا عندما تكون بالعكس أي يقبل جميع الحروف التي فيها BR5 ولايقبل التي ليست فيها في بداية الجملة أحرف BR5
ابوخليل قام بنشر أبريل 1, 2019 قام بنشر أبريل 1, 2019 الافضل اشرح لك الكود اعلاه من اجل تفصل على ما يحلوا لك Dim z As String هنا اخبرنا اكسس ان حرف زد نصي Dim i As Integer وهنا اخبرنا اكسس ان حرف آي رقمي i = Len(Me.text1)هنا قيمة آي تساوي عدد احرف او ارقام الحقل التي سندخلها z = Left(Me.text1, 3)هنا قيمة زد تساوي أول ثلاث حروف من اليسار ، لاحظ ان الرقم 3 يعبر عن عدد الحروف او الارقام المقتطعة فيمكن ان تضع الرقم 2 لتكون قيمة زد تساوي الحرفين الاولين نجي للتطبيق : اذا آي اكبر من 17 أو زد تساوي "بي آر خمسة" If i > 17 Or z = "BR5" Then تراجع Undo واظهر هذه الرسالة MsgBox "تأكد من ادخال البيانات بطريقة صحيحة" واخرج من الحدث Exit Sub انهاء الحدث End If أي شيء غير مفهوم يمكنك الاستفسار جواب سؤالك الاخير فقط تستبدل علامة = بعلامة <> ليصبح السطر If i > 17 Or z <> "BR5" Then
salimboub24 قام بنشر أبريل 1, 2019 الكاتب قام بنشر أبريل 1, 2019 في 1/4/2019 at 08:31, ابوخليل said: الافضل اشرح لك الكود اعلاه من اجل تفصل على ما يحلوا لك Dim z As String هنا اخبرنا اكسس ان حرف زد نصي Dim i As Integer وهنا اخبرنا اكسس ان حرف آي رقمي i = Len(Me.text1)هنا قيمة آي تساوي عدد احرف او ارقام الحقل التي سندخلها z = Left(Me.text1, 3)هنا قيمة زد تساوي أول ثلاث حروف من اليسار ، لاحظ ان الرقم 3 يعبر عن عدد الحروف او الارقام المقتطعة فيمكن ان تضع الرقم 2 لتكون قيمة زد تساوي الحرفين الاولين نجي للتطبيق : اذا آي اكبر من 17 أو زد تساوي "بي آر خمسة" If i > 17 Or z = "BR5" Then تراجع Undo واظهر هذه الرسالة MsgBox "تأكد من ادخال البيانات بطريقة صحيحة" واخرج من الحدث Exit Sub انهاء الحدث End If أي شيء غير مفهوم يمكنك الاستفسار جواب سؤالك الاخير فقط تستبدل علامة = بعلامة <> ليصبح السطر If i > 17 Or z <> "BR5" Then Expand يعطيك العافية يا أخي
Khalid Jnb قام بنشر أبريل 2, 2019 قام بنشر أبريل 2, 2019 اخي العزيز استخدم هذا القناع >AAAA ويقبل ارقام وحروف وحدد عدد الارقام او الحروف كما تحب
salimboub24 قام بنشر أبريل 3, 2019 الكاتب قام بنشر أبريل 3, 2019 اخي القناع >AAAA أريد عندما اكتب أحرف صغيرة لايقبل بحيث يكتب تلقائيا احرف كبيرة ومع الارقام أيضا في 2/4/2019 at 11:17, خالد سيسكو said: اخي العزيز استخدم هذا القناع >AAAA ويقبل ارقام وحروف وحدد عدد الارقام او الحروف كما تحب Expand في 31/3/2019 at 14:25, ابو ياسين المشولي said: اجابه في الصميم استاذي ابو خليل بارك الله فيك Expand السلام عليكم أريد أن أسئلك من أين أجد كل هده الاكواد أريد أن أتعلمها جميعا من أي مصدرها
salimboub24 قام بنشر أبريل 3, 2019 الكاتب قام بنشر أبريل 3, 2019 (معدل) في 2/4/2019 at 11:17, خالد سيسكو said: اخي العزيز استخدم هذا القناع >AAAA ويقبل ارقام وحروف وحدد عدد الارقام او الحروف كما تحب Expand ياأخي أريد يكتب بالاحرف الكبيرة ويقبل كتابة أرقام مثلا 151254 تم تعديل أبريل 3, 2019 بواسطه salimboub24
Khalid Jnb قام بنشر أبريل 3, 2019 قام بنشر أبريل 3, 2019 السلام عليكم اقرا هذا الموضوع فيه فائدة لك انشاء الله https://www.officena.net/ib/topic/82033-معلومات-قيمة-حول-قناع-الادخال-اتمنى-لكم-الفائدة/?tab=comments#comment-522588
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.