(28-03-20, 04:17 PM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
تفضل هذا انموذج كود لاملاء الكومبوبوكس

كود :

   Dim dt As New DataTable
       Dim da As New SqlDataAdapter
       dt.Clear()
       da = New SqlDataAdapter("Select * from GroupCode order by GrCode_Name Asc ", Con)
       da.Fill(dt)
       If dt.Rows.Count > 0 Then
           ComboBox1.DataSource = dt
           ComboBox1.DisplayMember = "GrCode_Name"
           ComboBox1.ValueMember = "GrCode_Id"
           ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems

       Else
           ComboBox1.DataSource = Nothing
       End Ifo

 قم بتغيير اسم الجدول والحقل الذي تريد اظهاره  وان كنت تريد عكس الترتيب اي من الياء الى الالف
 استبدل Asc  بـ Desc

(28-03-20, 04:43 PM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم 
انت لاتحتاج الى ماذكرت في ان تأخذ جملة الاستعلام من مربع نص
انت تحتاج الى تكملة تلقائية بمجرد ان تكتب في الكومبو حرفا يظهر لك قائمة واقتراح حسب الاحرف التي كتبتها
 وهذه تسمى AutoComplete   عدل الخاصية او بالكود هكذا

كود :

ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend

(28-03-20, 05:05 PM)boudyonline كتب :

كود :

da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '" & AlphaCB.Text & "%' order by NameOfMov " , sqlcon)

(28-03-20, 06:01 PM)ابراهيم ايبو كتب : السلام عليكم
تعديل بسيط  عل كود الاخ  boudyonline جزاه الله خيرا فقط اضافة % قبل هكذا

كود :

da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '%" & AlphaCB.Text & "%' order by NameOfMov " , sqlcon)