منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

مرحبا

انا لدي مشروع ويحتوي على اداة 2 اداة listbox

وكل اداة تحتوي على حروف وارقام

كيف نقارن اذا محتويات listbox1 مثل محتويات listbox2

انا كتبت الكود التالي

كود :

   If ListBox2.Text = ListBox1.Text Then

                MsgBox("good")

            Else

                MsgBox("no")

            End If

ولم ينجح ماهي المشكلة

ان كانت هناك طريقة مدعومة فلا اعلم لكن المحاولة قد تلبي وقد حاولت بالكود التالي:

PHP كود :

  Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim same As Boolean
        For i As Integer = 0 To ListBox1.Items.Count - 1
            Dim t As String = ListBox1.Items(i)
            For ii As Integer = 0 To ListBox2.Items.Count - 1
                Dim tt As String = ListBox2.Items(ii)
                If tt <> t Then
                    same = False
                Else
                    same = True
                End If
            Next
        Next
        If same = True Then
            MsgBox("Same", MsgBoxStyle.Information, "")
        Else
            MsgBox("NOt same", MsgBoxStyle.Critical, "")
        End If
    End Sub 

فنان اخي سعود

وسااسميك دكتور الفيوجال بيسك

(16-08-19, 02:42 PM)dasktop كتب : [ -> ]فنان اخي سعود

وسااسميك دكتور الفيوجال بيسك

هههههههه الله يسعدك Smile