[CLARO]

السلام عليكم اخواني ارغب بحل لهذا الكود 

PHP كود :

     Dim A8 As String = TextBox5.Text
            Dim A7 As String = TextBox8.Text
            Dim A13 As String = TextBox6.Text
            Dim A9 As String = TextBox7.Text
            Dim A5 As String = TextBox13.Text
            Dim A11 As String = TextBox9.Text
            Dim s As String = TextBox4.Text
            If Not String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(s) Then

                ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1

            Else

                If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A8) Then
                    ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                Else
                    If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A7) Then
                        ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                    Else
                        If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A13) Then
                            ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                        Else
                            If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A9) Then
                                ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                            Else

                                If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A5) Then
                                    ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                                Else

                                    If String.IsNullOrEmpty(SearchDirectionHint.Up) AndAlso ListBox1.SelectedItem.Contains(A11) Then
                                        ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
                                    End If

                                End If
                            End If
                        End If 


هذا الكود بكل بساطة اذا كان النص الموجود في ليست بوكس = نص موجود في التيكست بوكس 1 اليست بوكس ينتقل الى الitems الي بعده واذا النص لم يكون موجود باليست بوكس واحد البرنامج بشوف اذا كان النص الي موجود باليست بوكس 2 هو مساوي للitems المحدد في اليست بوكس 

اذا فهمت فانا ارغب بتصحيح الكود او ارغب بكود مشابه له يقوم بنفس العملية 
بحيث يكون عندي 7 تيكست بوكس و اذا توافق احد النصوص الموجودة في احدى التيكست بوكس مع الخيار المحدد في اليست بوكس ينتقل الى الitems الي بعده

اتمنى اني اكون وصلتلك الي ببالي