[dasktop]

(29-09-18, 02:21 PM)elgokr كتب :

مرحباً اخى dasktop

فقط كل ما عليك جعل كود الزر بهذا الشكل

كود :

       Dim port_ As String() = TextBox1.Text.Split(",")
       For ii As Integer = 0 To port_.Count - 1
           If TextBox2.Text.Contains(port_(ii)) = True Then
               MsgBox("البورت المراد البحث عنه موجود بالفعل وهو " & port_(ii))
           Else
               MsgBox("لم يتم الحصول على اى بورت من المدخل")
           End If
       Next

تحياتى لك

وتمنياتى لك التوفيق

اخي ضهر لي الخطا التالي +   الكود المطلوب هو ان يبحث في listbox عن اي رقم يختلف عن الارقام التالية 80 , 443, 135 واذا يوجد رقم يختلف عنها يضهر رساله تنبيه فقط