[Abou Eman]

(24-05-16, 12:21 PM)عبدالرحمن المكاوي كتب :

(23-05-16, 12:05 PM)amgad525 كتب :

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.TextChanged
    Static myList As Array
    If IsNothing(myList) Then myList = Me.ListBox1.Items.OfType(Of String).ToArray
    Me.ListBox1.Items.Clear()
    Me.ListBox1.Items.AddRange((From x As String In myList Where x.ToLower.StartsWith(Me.TextBox1.Text.Trim.ToLower)).ToArray)
End Sub 


شكرا شكرا علي مجهوداتك الكود اشتغل تمام

---

(24-05-16, 12:21 PM)عبدالرحمن المكاوي كتب :

(23-05-16, 12:05 PM)amgad525 كتب :

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.TextChanged
    Static myList As Array
    If IsNothing(myList) Then myList = Me.ListBox1.Items.OfType(Of String).ToArray
    Me.ListBox1.Items.Clear()
    Me.ListBox1.Items.AddRange((From x As String In myList Where x.ToLower.StartsWith(Me.TextBox1.Text.Trim.ToLower)).ToArray)
End Sub 


شكرا شكرا علي مجهوداتك الكود اشتغل تمام

لكن عن ربط البرنامج بقاعدة داتا سورس وكتابت اي حرف انظر ماذا يحدث

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