11-04-16, 06:42 PM
طريقة جعل مربع البحث يظهر لائحة منسدلة فيها الاختيارت البحث يعني إذا كتبت أول حرف يظهر باقي الحروف في لائحة منسدلة مثل القوقل في الفجوال بيزك طبعا في txtbx البحث
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
(11-04-16, 07:13 PM)foxweb كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
اتوقع هذا الرابط قد يفيدك
http://www.authorcode.com/search-textbox...in-vb-net/

(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