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

مرحبا كيفكم لدي مثلا 2 Listbox الاول فيه 5 اسطر مثلا كل سطر فيه كلمه معينه نعتبر ان الخمس كلمات دول
Hello
HI
Welcome
Thanks
Pro
ولدي ايضا Listbox الثاني فيه 5 كلمات نعتبر ان الخمس كلمات دول
No
Yes
Try
Thanks
Hello
عايز ال listbox الاول يفحص الثاني اذا كان فيه كلمه معينه متشابها يطلعها ويفنذ كود معين لو كانت كلمه لو كانت اكتر من كلمه يطلع واحده واحده وينفذ كود ويطلع غيرها

تفضل أخي

كود :

For x As Integer = 0 To ListBox1.Items.Count - 1

            For y As Integer = 0 To ListBox2.Items.Count - 1

                If ListBox2.Items(y) = ListBox1.Items(x) Then

                    'ضع الكود الذي تريد

                End If

            Next

        Next

(06-06-20, 06:23 PM)WaeLx كتب : [ -> ]تفضل أخي

كود :

For x As Integer = 0 To ListBox1.Items.Count - 1 For y As Integer = 0 To ListBox2.Items.Count - 1 If ListBox2.Items(y) = ListBox1.Items(x) Then 'ضع الكود الذي تريد End If Next Next

شكرا لك اخي لكن لو عايزه يرجع مره اخري لاول مره لكي اعيد الكود لن هكذا عندما ينتهي من جميع الاسطر الموجوده لم يتم اعادة الكود مره اخري

(06-06-20, 07:25 PM)developermedo111 كتب : [ -> ]
(06-06-20, 06:23 PM)WaeLx كتب : [ -> ]تفضل أخي

كود :

For x As Integer = 0 To ListBox1.Items.Count - 1 For y As Integer = 0 To ListBox2.Items.Count - 1 If ListBox2.Items(y) = ListBox1.Items(x) Then 'ضع الكود الذي تريد End If Next Next

شكرا لك اخي لكن لو عايزه يرجع مره اخري لاول مره لكي اعيد الكود لن هكذا عندما ينتهي من جميع الاسطر الموجوده لم يتم اعادة الكود مره اخري

اعذرني أخي الفاضل

لكن هل يمكن التوضيح أكثر؟