[vb2010]

بسم الله الرحمن الرحيم و به نستعين و الصلاة و السلام على سيدنا و مولانا محمد رسول الله صلى الله عليه و آله و سلم
السلام عليكم
عندى داتاجريد فيو تحمل بيانات من جدول و كومبوبكس للبحث يحمل بيانات من نفس الجدول و ضبط الخاصيه autocompletemode=sugsetapend و الخاصيه autocompletesource=filesystem

كود :

Private Sub Form_bank_main_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
       load_bank()
       newbank()
       DataGridView1.DataSource = dt_bank
   
       'ملء الكومبوبوكس
       Cmbsearch.DataSource = dt_bank
       Cmbsearch.DisplayMember = "bank_name"
       Cmbsearch.ValueMember = "bank_id"


       Me.DataGridView1.Columns(0).HeaderText = "رقم البنك"
       Me.DataGridView1.Columns(1).HeaderText = "الاسم"
       Me.DataGridView1.Columns(2).HeaderText = "العنوان"
       Me.DataGridView1.Columns(3).HeaderText = "الهاتف"
       Me.DataGridView1.Columns(4).HeaderText = "الفاكس"
       Me.DataGridView1.Columns(5).HeaderText = "البريد الالكتروني"
       Me.DataGridView1.Columns(6).HeaderText = "الموقع الالكتروني"
       Me.DataGridView1.Columns(7).HeaderText = "ملاحظات"
       Me.DataGridView1.Columns(8).HeaderText = "مدخل البيانات"
       Me.DataGridView1.Columns(9).HeaderText = "تاريخ التسجيل"
       Me.DataGridView1.Columns(10).Visible = False

       'newbank_id()
   End Sub

اريد عند الكتابه فى الكمبوبكس يفلتر الداتاجريد فيو

[asemshahen5]

كود :

Dim StrSQL as string = "Select * From Table_Name  Where Column_Name Like '%" & Cmbsearch.Text & "%'"
Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\NamsXT.mdb;User Id=admin;Password=;")
Dim da As New OleDbDataAdapter(StrSQL, cn)
Dim dt As New DataSet
da.Fill(dt,"Table_Name")
Dgv_Table.DataSource = dt.Tables("Table_Name")