تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] النص في اداة RichTextBox
#1
السلام عليكم

انا اطلب طلب صعب في النص في اداة RichTextBox وهو :

مثلا في الفيجوال بيسك في صفحة الكود (محرر الكود) يكتب اشياء كثير ياتي هنا الطلب
انا كتبت في اداة RichTextBox التالي:

احمد
محمد
محمود
الي اخره

وكتبت كود هكذا في صفحة الكود طلبت من البتون التالي
PHP كود :
 
    
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        
If RichTextBox1.Text "محمد" Then
            MsgBox
("اهلا")
        End If
    End Sub    
عمر الكود ما هيتنفذ لسبب واحد اني انا قلت له لحظ معي RichTextBox1.Text = "محمد"
شيفين طلبت ايه محمد فقط وفي الريكتش بوكس (صندوق النص ) التالي : 
احمد
محمد
محمود
فهو لم يلقي محمد فقط بل لقي احمد ومحمد الخ

هو دي الطلب انا عايز لوفي مليون كلمة وهو جاب ضغط علي الزر يعمل كذ
كذ هنا في المثال سيخرج رسالة مكتوب به اهلا

اتمنا يكون السوال وصل
Heart Heart Heart
موقعي (مدونتي):-
هنا

[url=https://sobertgueni.blogspot.com.eg/][/url]: )
الرد }}}}
تم الشكر بواسطة:
#2
تفضل اخي الكريم ...
كود :
Dim Index As Integer
        Index = RichTextBox1.Find("محمد")
        If Index <> -1 Then
            MessageBox.Show("اهلا")
        End If
الرد }}}}
تم الشكر بواسطة: soper
#3
كودك رائع يعمل بشكل جيد

سوال اخر مثلا انا كتبت في الركتش بوكس (صندوق النص)

مثلا : Button1.text = "محمد"
واول ما اضغط علي البتون يغيرو ولو غيرت الي بين علامة "هنا الكلامة"

برذو يتغير اول ما اضغط الذر

Heart Heart
موقعي (مدونتي):-
هنا

[url=https://sobertgueni.blogspot.com.eg/][/url]: )
الرد }}}}
تم الشكر بواسطة:
#4
وجدت الحل وهو التالي :
PHP كود :
If New System.Text.RegularExpressions.Regex("text<.+?>"System.Text.RegularExpressions.RegexOptions.IgnoreCase).IsMatch(RichTextBox1.Text) = False Then Exit Sub
       Dim b 
As String RichTextBox1.Text.Split("<")(1).Split(">")(0)
 
      Button1.Text 
وشكرا للاخ Lovevb لانه هو من اعطاه لي
موقعي (مدونتي):-
هنا

[url=https://sobertgueni.blogspot.com.eg/][/url]: )
الرد }}}}
تم الشكر بواسطة: LoveVb , LoveVb


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار بخصوص عدم ظهور اداة عرض ملف pdf في الادوات عباسة 7 115 منذ 8 ساعة مضت
آخر رد: عباسة
  مشكلة في عرض النص بالعربي في #Region فقط ali.alfoly 1 55 أمس, 02:50 AM
آخر رد: مساعدة
Wink [VB.NET] استفسار بخصوص التعديل والحفظ علي اداة datagridview dark1459 9 104 20-02-17, 02:13 AM
آخر رد: khodor1985
Lightbulb للخبراء هل توجد مكتبة او اداة لعمل مثل هذا النموذج عن طريق vb.net ارجو المساعدة Amrjamil 6 82 18-02-17, 02:19 PM
آخر رد: Amrjamil
  [سؤال] كيف يمكنني استخدام متغير لمناداة اي اداة اليوم مبتدئة وغداً محترفة 3 91 04-02-17, 09:57 PM
آخر رد: عبد الرحمن
  كيف يمكن تثبيت رقم داخل مربع النص والنموذج فى وضع العرض السيد الجوهري 5 100 28-01-17, 02:25 AM
آخر رد: السيد الجوهري
  كيف يمكن تحريك مربعات النص على التقرير السيد الجوهري 3 114 27-01-17, 11:29 PM
آخر رد: السيد الجوهري
  كيفية ادراج نص في اداة RichTextBox مع الاحتفاظ بالنص soper 3 79 25-01-17, 02:23 PM
آخر رد: مساعدة
  اداة اختيار الملفات محمد بن عطية 2 131 12-01-17, 06:01 PM
آخر رد: مساعدة
  اريد كود لفتح ملف صوتى فى اداة ويندوز ميديا بلير من ملف الريسورس المبرمج الاسطورى 5 592 23-12-16, 03:16 PM
آخر رد: silverlight

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم