[barakascap]

السلام عليكم ورحمة الله وبركاته
لدى تكست بوكس 1 "e,4,8,h,ss"
ونكست بوكس 2 "8,6,g,e,xx"
اريد ان ايجاد ماهو موجود فى تكست بوكس 1 وليس فى تكست بوكس 2 وكذا ماهو موجود فى 2 وليس فى و 1
وكل عام وانتم بخير

[أبو أحمد الحربي]

وعليكم السلام ورحمة الله وبركاته
تفضل هذا الكود

PHP كود :

Imports System.Text.RegularExpressions 


في الزر الاول وهو "الموجد في 1 وليس موجود في 2"

PHP كود :

Dim T As MatchCollection
        Dim Txt As String = ""
        For Each x As String In TextBox1.Text.Split(",")
            T = Regex.Matches(TextBox2.Text, x)
            If T.Count = 0 Then Txt &= x & Space(3)
        Next
        MsgBox(Txt) 


وفي الثاني "الموجود في 2 وليس موجود في 1"

PHP كود :

Dim T As MatchCollection
        Dim Txt As String = ""
        For Each x As String In TextBox2.Text.Split(",")
            T = Regex.Matches(TextBox1.Text, x)
            If T.Count = 0 Then Txt &= x & Space(3)
        Next
        MsgBox(Txt)