تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيفية البحث داخل حقل تيكست عن كلمة بداخله والمقارنة
#1
السلام عليكم ورحمه الله وبركاته
ما اريده هو ان اقوم بالبحث عن نص مكتوب في صفحة ويب ويتم استخراج محنتوي صفحة الويب الى تيكست
 ويتم ادخال قيم للتيسكت الاخر ليتم المقارنة بينهم
يتم استخرام محتوي صفحة الويب الىي تيكست واحد
واقوم يدويا بادخال القيم الي تيكست 2
استخدم الكود الحالي
PHP كود :
If TextBox1.Text.Contains(TextBox2.Text.ToStringThen
            MsgBox
("Found")
 
       Else
            MsgBox
("NOt matched")
 
       End If
 
   End Sub 
اريد عند وجود اي جزء من التيكست الذي اقوم بادخاله يددويا يظهر لي انه موجود
الرد
تم الشكر بواسطة:
#2
ما اريده هو نفترض لدي 2 تيكست بوكس موجود في الاول كلام كتثير

والثاني موجود به مثلا تمت خسارة ربح
اريد ان يتم البحث عن اي من ال 3 كلمات  في حالة توفر اى واحده منهم اعرف ؟
الرد
تم الشكر بواسطة:
#3
(25-12-18, 03:44 PM)dametucorazon كتب : السلام عليكم ورحمه الله وبركاته
ما اريده هو ان اقوم بالبحث عن نص مكتوب في صفحة ويب ويتم استخراج محنتوي صفحة الويب الى تيكست
 ويتم ادخال قيم للتيسكت الاخر ليتم المقارنة بينهم
يتم استخرام محتوي صفحة الويب الىي تيكست واحد
واقوم يدويا بادخال القيم الي تيكست 2
استخدم الكود الحالي
PHP كود :
If TextBox1.Text.Contains(TextBox2.Text.ToStringThen
            MsgBox
("Found")
 
       Else
            MsgBox
("NOt matched")
 
       End If
 
   End Sub 
اريد عند وجود اي جزء من التيكست الذي اقوم بادخاله يددويا يظهر لي انه موجود

(27-12-18, 12:44 PM)dametucorazon كتب : ما اريده هو نفترض لدي 2 تيكست بوكس موجود في الاول كلام كتثير

والثاني موجود به مثلا
اريد ان يتم البحث عن اي من ال 3 كلمات  في حالة توفر اى واحده منهم اعرف ؟


وعليكم السلام ورحمة الله وبركاته

تفضل الكود
TextBox1 يحتوي الكلام الكثير
TextBox2 يحتوي تمت خسارة ربح
PHP كود :
'TextBox2 : تمت خسارة ربح
Dim a() = TextBox2.Text.Split ' 
تقسيم النص الى كلمات
Dim f 
False ' النتيجة
لوب
For 0 To a.Length 1
    
' التأكد وجود الكلمة في النص
    If TextBox1.Text.Contains(a(i)) Then
        ' 
النتيجة نعم
        f 
True
        
' الخروج من اللوب
        Exit For
    End If
Next

إذا النتيجة إيجابية
If True Then
    MsgBox
("Found")
Else
 
   ' إذا النتيجة سلبية
    MsgBox("NOt matched")
End If 
الرد
#4
جزاك اله خيرا اخي الفاضل علي المساعدة
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية اضافة اسم وصورة المنتج في الفورم نور الهدى الهدى 2 56 منذ 3 ساعة مضت
آخر رد: asemshahen5
Question كيفية التخلص من تكرار تخزين البيانات الرائد 12 345 11-07-19, 10:51 PM
آخر رد: Al Wilaya
  مساعدة كيفية عمل نفس الرسام وحفظ الصورة بنفس ID alshandodi 3 106 08-07-19, 12:58 PM
آخر رد: ابراهيم ايبو
  [VB.NET] كيف ممكن اضيف اكثر من مكتبه داخل ريسوريس e-coder 0 59 07-07-19, 07:59 PM
آخر رد: e-coder
  استفسار عن برمجة عدة ادوات داخل صندوق GroupBox1 سليم بلقاسم 5 171 07-07-19, 03:15 AM
آخر رد: سليم بلقاسم
Question [VB.NET] كيفية عرض الصور من قاعدة البيانات على picturebox الرائد 9 284 07-07-19, 02:30 AM
آخر رد: ابراهيم ايبو
  [سؤال] اخواني اريد عند الضغط علي الزر يظهر هذا ال نص داخل textbox1 XCoder 3 99 05-07-19, 09:26 PM
آخر رد: XCoder
Photo استفسار عن برمجة عدة ادوات داخل صندوق GroupBox1 سليم بلقاسم 1 82 05-07-19, 07:25 PM
آخر رد: elgokr
  كيفية جعل الكتابة التلقائية في الداتا قريد adminHN 3 222 02-07-19, 05:16 PM
آخر رد: ابراهيم ايبو
  البحث بين تاريخين لاسم معين alshandodi 9 269 18-06-19, 12:06 PM
آخر رد: elgokr

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


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