تقييم الموضوع :
  • 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
جزاك اله خيرا اخي الفاضل علي المساعدة
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  خطأ أثناء عملية البحث في DATAGRIDVIEW ahmedfa71 5 68 14-05-19, 04:10 PM
آخر رد: elgokr
  [سؤال] كيف يمكنني الحصول علي رابط داخل كود جافا من خلال الويب براوزر dametucorazon 0 38 11-05-19, 06:10 AM
آخر رد: dametucorazon
Photo مطلوب كود لتقسيم نص لعدة نصوص من داخل ملف نصي Top King 8 195 07-05-19, 06:15 PM
آخر رد: asemshahen5
  البحث بتاريخ من نوع نصي محمد خيري 18 271 05-05-19, 06:37 PM
آخر رد: محمد خيري
  سورس كود لوضع زر امر داخل الداتا جريد فيو احمد129 2 127 01-05-19, 12:45 PM
آخر رد: DK-x
  [VB.NET] حفظ ما في listview داخل settings trakktour 2 123 30-04-19, 02:33 AM
آخر رد: trakktour
  كيفية تشغيل برنامج exe باستخدام الفيجوال Emam emam 5 167 29-04-19, 03:04 PM
آخر رد: alsouf
  كيفية استخراج بيانات من اكثر من جدول وطباعتها المتألق9 3 124 25-04-19, 04:21 PM
آخر رد: elgokr
  [سؤال] حفظ الملف داخل الفولدر mostafa nada 4 152 24-04-19, 04:37 PM
آخر رد: mostafa nada
  هل يُمكن عرض نتيجة البحث في الداتاجريدفيو الثانية بدلاً من الأولى ؟ Hazem1 5 142 20-04-19, 08:21 AM
آخر رد: elgokr

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


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