عندي سؤال يا جماعة
كيف أمنع كلمة معينة داخل TextBox بطوله
بمعنى أني لما أستخدم هذا الكود
If Text1.Text = "الكلمة" Then MsgBox "هذه الكلمة ممنوعة" End If
مع التشغيل إذا ضغط مسافة وكتبت الكلمة لا ينفذ الأمر يجب أن تكون الكلمة بدون مسافات
المطلوب كود لمنع كلمة معينة داخل مربع النص حتى مع المسافة
تحياتي
بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته
يوجد الكثير من الحلول أخي الحبيب .. و هنا طريقة بسيطة ليست الافضل ابدا ولكنها تحايل سريع على المسئلة يمكنك اختبارها بإذن الله تعالى و التعديل عليها :
If InStr(Text1.Text, "ثلاثة") <> 0 Then MsgBox "ممنوع كتابة كلمة ثلاثة" Text1.Text = Replace(Text1, "ثلاثة", "") End If
انا هنا افترضت ان الكلمة التي تريد منع كتابتها هي الكلمة (ثلاثة) ...جرب ان تكتب اي نصوص ثم حاول ان تكتب الكلمة ثلاثة في مربع النص فلعلها تفي بغرضك بإذن الله تعالى
السلام عليكم و رحمة الله و بركاته
تم تعديل هذه المشاركة بواسطة رغيد الطيب في 10 مايو 2005 في 12:34
مواضيع برمجية تقنية جديدة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال خدمة الـ RSS في برامجنا ومواقعنا ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج للبحث في الملفات ومحتواياتها (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• فئة للتراسل بين برنامجين في جهاز واحد ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
مواضيع برمجية تقنية قديمة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال رسائل البالونات Balloons في الوينذوز أكس بي(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• مقالة : لماذا يجب ان نعتني بشفرات برامجنا !؟- (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• لمطوري البرامج و مواقع الويب - برنامج تركيب ألوان - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : بسيط للتحكم بالنظام, عن طريق الريجستري - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : لتقييد و منع تشغيل البرامج الاخرى - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• النوافذ المنبثقة و طريقة لإستغلالها في برامجنا -(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• تقنية الإستدعاء الذاتي - (VB.NET , VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• مصفوفات الأدوات Control Arrays افكار وتلميحات ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• أفكار و تلميحات[ المعنى الحقيقي للـ True و False ] - أمثلة (VB.NETVB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• دوال الـ APIs و مايقابلها في الدوت نت ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
شكراً لك أخي الكريم رغيد الطيب بارك الله فيك
هذا الموضوع مغلق.