تقييم الموضوع :
  • 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 ك ب / التحميلات : 46)
الرد }}}
تم الشكر بواسطة:
#3
انظر هذا المثال


الملفات المرفقة
.rar   compartext.rar (الحجم : 100.11 ك ب / التحميلات : 43)
الرد }}}
تم الشكر بواسطة:
#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 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معرفة رصيدي للهاتف النقال المتصل بالكمبيوتر وارسال رسائل نصية منه AHMED213 0 98 22-02-24, 11:47 AM
آخر رد: AHMED213
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 1 312 21-02-24, 11:44 PM
آخر رد: AHMED213
  معرفة عدد مرات تكرار الاسم في الداتاقريدفيو صالح عبدالله 8 426 05-02-24, 04:39 PM
آخر رد: صالح عبدالله
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 7 676 12-01-24, 07:31 PM
آخر رد: Kamil
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 305 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  حماية عمود داخل ورقة الاكسل العيدروس 3 190 05-01-24, 12:21 AM
آخر رد: HALIM ELEULMA
  معرفة عدد الاشهر خلال فترة زمنيةمعينة boofa2022 0 170 01-01-24, 01:18 PM
آخر رد: boofa2022
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 461 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  يوجد مشكلة عند تحميل البيانات فى كمبوبوكس داخل داتا جريد new_programer 2 473 17-10-23, 06:51 PM
آخر رد: new_programer
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 350 05-08-23, 02:29 PM
آخر رد: moh61

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


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