[علي نوري]

تفضل اخي هذا الكود 

PHP كود :

  On Error Resume Next
        Dim ww = New WebClient().DownloadString("https://pastebin.com/raw/EQScPkvp")
        Dim name As MatchCollection = Regex.Matches(ww, "(?<=""name"":"").+?(?="")")
        For i = 0 To name.Count - 1
            Dim farfour As New ListViewItem
            farfour.Text = name(i).Value
            ListView1.Items.Add(farfour)
        Next
        Me.TextBox1.AutoCompleteCustomSource.AddRange((From x As ListViewItem In Me.ListView1.Items Select x.Text).ToArray)
        Me.TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
        Me.TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource 


للتوضيح هذا استكمال تلقائي وليس بحث 

 المشروع بالمرفقات