[justforit]

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

وجدت ضمن ملف نصي اسم Mohammedطبعا ضمن اسماء كثيرة متوقعة.

فبحثت عن هذا الاسم في الصفحات المصدر ووجدت  الاسم هكذا

(Ahmed+Ahmed=Mohammed)

عملت كود يجلب الاسماء مع وقت الانتساب والفاصل بينهم علامة (=) 

طبعا قلت(كتبت) مبرمج ذكي لانه اتعبني

فما هي الطريقة المثلى لكشف هذا الامر بالكود يعني اريد معرفة الرمز الموجود بالاسم من قبل  والرمز اللذي اضيفه بالكود

مثلا الفلتر او العبارة التالية لامشكلة فيها

saud=2025

ali=2026

كذا ممتاز لكن:

saud+ali=any

هذي مشكلة لان لو طبقت الكود سيكون الاسم:

saud+ali

و any سيكون التاريخ (مثلا)

آسف على الاطالة

شكر الله لكم جميعا

[Zuhare]

هل هذا المطلوب

كود :

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
   Dim arr As New ArrayList

   Dim users = File.ReadAllText("textfile.txt")
   For Each m As Match In Regex.Matches(users, "(.*)=(.*)")
       arr.Add(New With {
               .UserName = Regex.Replace(m.Groups(1).Value, "\W", " "),
               .RegDate = m.Groups(2).Value})
   Next

   Me.DataGridView1.DataSource = arr
End Sub

يمكن استبدال الحرف W بالرمز + اذا كان الهدف فقط حذف الرمز +

[justforit]

(02-11-25, 11:13 PM)Zuhare كتب : هل هذا المطلوب

كود :

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
   Dim arr As New ArrayList

   Dim users = File.ReadAllText("textfile.txt")
   For Each m As Match In Regex.Matches(users, "(.*)=(.*)")
       arr.Add(New With {
               .UserName = Regex.Replace(m.Groups(1).Value, "\W", " "),
               .RegDate = m.Groups(2).Value})
   Next

   Me.DataGridView1.DataSource = arr
End Sub

يمكن استبدال الحرف W بالرمز + اذا كان الهدف فقط حذف الرمز +

بارك الله فيك .