[biloo20]

طريقة جعل مربع البحث يظهر لائحة منسدلة فيها الاختيارت البحث يعني إذا كتبت أول حرف يظهر باقي الحروف في لائحة منسدلة مثل القوقل  في الفجوال بيزك طبعا في txtbx  البحث 

[foxweb]

السلام عليكم ورحمة الله وبركاته
اتوقع هذا الرابط قد يفيدك
http://www.authorcode.com/search-textbox...in-vb-net/

[ممدوح]

ممكن تعدل خصائص ال combobox الخاخاصية autocompltemode الى suggest والخاصية اللي تحتها مباشرة الى listitems

[Adrees]

هذه الطريقة تسمى خاصية الاكمال التلقائي
تفضل هذا الكود يفي بالغرض

PHP كود :

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        Dim da As New OleDbDataAdapter("Select * from UserTb", cn)
        da.Fill(dt)
        Dim auto As New AutoCompleteStringCollection
        For Each dr As DataRow In dt.Rows
            auto.Add(dr("Uname"))
        Next
        TextBox1.AutoCompleteCustomSource = auto
        TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
        TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

    End Sub 


[biloo20]

(11-04-16, 07:13 PM)foxweb كتب : السلام عليكم ورحمة الله وبركاته
اتوقع هذا الرابط قد يفيدك
http://www.authorcode.com/search-textbox...in-vb-net/

شكرا لك اخي  افادني الرابط ولقيت ضالتي بفضل الله ثم يفضلك 
جزالك الله خيرا 

[biloo20]

(11-04-16, 08:48 PM)Adrees كتب : هذه الطريقة تسمى خاصية الاكمال التلقائي
تفضل هذا الكود يفي بالغرض

PHP كود :

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        Dim da As New OleDbDataAdapter("Select * from UserTb", cn)
        da.Fill(dt)
        Dim auto As New AutoCompleteStringCollection
        For Each dr As DataRow In dt.Rows
            auto.Add(dr("Uname"))
        Next
        TextBox1.AutoCompleteCustomSource = auto
        TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
        TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

    End Sub 


 شكرا لك أخي الكريم جزاك الله خيرا  سأحول الكود إلى برنامجي مع التغييرات المناسبة