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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تقسيم ip داخل textbox Incubus 2 47 منذ 10 ساعة مضت
آخر رد: Incubus
  تحميل قيم اكبرid فى الداتا جريد فيو داخل تسكت بوكس araxis 1 48 09-12-16, 06:31 PM
آخر رد: ابراهيم النعيمي
  [سؤال] حفظ النص المكتوب داخل listBox فارس جراح 7 126 15-11-16, 04:00 AM
آخر رد: LoveVb
  [VB.NET] عدة ملفات نصية rabeh.ram 2 63 13-11-16, 08:13 AM
آخر رد: rabeh.ram
  [VB.NET] سؤال كيف يمكن معرفة التغير في قاعدة البيانات وليد الزنتاني 2 120 10-11-16, 01:20 AM
آخر رد: وليد الزنتاني
  [VB.NET] تحويل التاريخ لسلسلة نصية tifagreet 1 94 01-11-16, 01:28 PM
آخر رد: ممدوح
  معرفة الاشخاص المتصلين بقاعدة البيانات في الشبكة المحلية ببساطة مثل مقاهي الانترنت thevirus 2 126 29-10-16, 06:25 PM
آخر رد: thevirus
Lightbulb المساعدة في معرفة طريقة كتابة الأكواد بشكل صحيح ... Arabia 0 74 26-10-16, 03:18 PM
آخر رد: Arabia
  كيفية إضافة فورم داخل بانل في الفورم الرئيسي bidaya 4 135 21-10-16, 04:40 AM
آخر رد: silverlight
  هل يمكن عرض صفحة اكسل داخل نموذج فيجوال بيسيك 2010 walkady 4 164 18-10-16, 07:52 PM
آخر رد: sayedf1

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


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