تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معرفة نص مطابق لنص آخر داخل سلسة نصية
#1
بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته
كيف يمكنني معرفة نص مطابق لنص آخر داخل سلسة نصية مثلا:
Dim str1 as string = "my name is Ismail"
Dim str2 as string = "your name is Ahmed"
طبعا كلمة name is موجودة في المتغيرين فكيف يمكنني معرفة النص المطابق مع العلم أني لا أعرف النص المطابق كيلا يقول لي شخص استخدم الدالة contains
فهل هناك دالة تقارن بين نصين وترجع النص المطابق لجزء من التص الآخر
إذا لم تكن هناك دالة هل يمكن من أحد الأخزة صنع دالة تقوم بالمهمة

شكرا مقدما
الرد }}}}
تم الشكر بواسطة:
#2
تفضل اخي هذا المثال للبحث عن اي كلمة تحمل حرف معين ويسردها لك بلست بوكس بالتوفيق


الملفات المرفقة
.rar   WindowsApplication38.rar (الحجم : 70.03 ك ب / التحميلات : 24)
الرد }}}}
تم الشكر بواسطة:
#3
انظر هذا المثال


الملفات المرفقة
.rar   compartext.rar (الحجم : 100.11 ك ب / التحميلات : 23)
الرد }}}}
تم الشكر بواسطة:
#4
نحمده ونصلي على رسوله الكريم
كود :
[align=left]Dim str1 As String = "my name is Ismail"
Dim str2 As String = "your name is Ahmed"

For Each str As String In str1.ToLower().Split(New Char() {" "})
    If str2.ToLower().IndexOf(str) > -1 Then MessageBox.Show(str)
Next
[/align]
الرد }}}}
تم الشكر بواسطة:
#5
ما شاء الله شكرا لكم جميعا
ولكن كنت أريد أن تكون النتيجة بعد المقارنة ترجع النص المطابق كاملا وليس كلمة كلمة
الرد }}}}
تم الشكر بواسطة:
#6
PHP كود :
يصبح الكود هكذا
Imports System
.Text
Public Class Form1

    
Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim str
() As String TextBox1.Text.Split(" "c)
        
Dim strbuilder As New StringBuilder

        Dim i 
As Integer
        
For 0 To str.Length 1
            
If TextBox2.Text.Contains(str(i).ToStringThen

                strbuilder
.Append(str(i).ToString " ")


            
End If
        
Next i
        MsgBox
(strbuilder.ToString)
    
End Sub
End 
Class 
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كمبو بوكس داخل الداتا جريد فارس احمد السيد 5 136 23-02-17, 09:44 PM
آخر رد: فارس احمد السيد
  [سؤال] أريد معرفة اخر صف في الجدول حنان المغربى 2 101 11-02-17, 12:02 AM
آخر رد: حنان المغربى
  [سؤال] استفسار داخل List box عبدالرحمن المكاوي 10 187 31-01-17, 05:32 PM
آخر رد: عبدالرحمن المكاوي
Thumbs Up [VB.NET] ادراج صور وملفات داخل ال sql باستخدام vb khallak86 0 76 31-01-17, 11:40 AM
آخر رد: khallak86
  [سؤال] معرفة الاسماء في الجداول الثلاثة المكترره محمد بوقزاحة 1 71 30-01-17, 11:54 AM
آخر رد: مساعدة
  كيفية معرفة اذا كانت form لا تزال مفتوحة ؟ noway 2 112 29-01-17, 04:12 PM
آخر رد: ابو ليلى
  كيف يمكن تثبيت رقم داخل مربع النص والنموذج فى وضع العرض السيد الجوهري 5 133 28-01-17, 02:25 AM
آخر رد: السيد الجوهري
  تحميل قيم اكبرid فى الداتا جريد فيو داخل تسكت بوكس araxis 8 309 20-12-16, 08:42 PM
آخر رد: ابراهيم النعيمي
  تضمين ملف exe داخل مشروعك Incubus 2 212 14-12-16, 02:13 PM
آخر رد: Incubus
  [VB.NET] تنسيق التاريخ داخل داتاجريد tifagreet 5 265 12-12-16, 11:04 AM
آخر رد: tifagreet

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


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