عرض عنصر في الكمبوبوكس - نسخة قابلة للطباعة

عرض عنصر في الكمبوبوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : عرض عنصر في الكمبوبوكس (/showthread.php?tid=27516)

الصفحات: 1 2

RE: عرض عنصر في الكمبوبوكس - atefkhalf2004 - 21-11-18

هل توجد اداة بديلة وكيف يتم الاستخدام

RE: عرض عنصر في الكمبوبوكس - حريف برمجة - 21-11-18

(19-11-18, 10:07 PM)atefkhalf2004 كتب : يتم تعبئة الكمبو من خلال الكود
Dim dsp As New DataSet
        Sql = "SELECT * FROM adsupp order by supp_name "
        Dp = New OleDbDataAdapter(Sql, objconn)
        Dp.Fill(dsp, "adsupp")
        objconn.Close()
        ComboBox4.Items.Clear()

        ComboBox4.DataSource = dsp.Tables("adsupp")
        ComboBox4.DisplayMember = "supp_name"
        ComboBox4.ValueMember = "supcod"
        ComboBox4.Text = ""

مرحبا اخي ،،

لتعبئة الكومبو الأفضل تجنب تحديد جميع حقول الجدول بكتابة * فقط اكتب الحقل او الحقول المراد التعامل معها في جملة السيليكت :

كود :

Dp = New OleDbDataAdapter("SELECT supp_name , supcod FROM adsupp  order by supp_name ", objconn)

        Dp.Fill(dsp, "adsupp")

ComboBox4.DataSource = dsp.Tables("adsupp")

ComboBox4.DisplayMember = "supp_name"

ComboBox4.ValueMember = "supcod"

ComboBox4.Text = ""

اما فيما يخص الموضوع الأساسي وهو الإكمال التلقائي بمجرد كتابة حرف في الكومبو بوكس سواء في اول او وسط او آخر الاسم :

ضع هذا الكود في أي مكان في الفورم :

كود :

Private Sub ComboBox4_TextChanged(sender As Object, e As EventArgs) Handles ComboBox4.TextChanged

        If ComboBox1.Text = "" Then Exit Sub

        Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM adsupp where supp_name like '%" & ComboBox4.Text & "%'", Conn)

        Dim DS As New DataSet

        DataAdapter1.Fill(DS, "adsupp")

        DataGridView1.DataSource = DS.Tables(0)

    End Sub

RE: عرض عنصر في الكمبوبوكس - atefkhalf2004 - 30-11-18

شكرا علي ردودكم جميعا
السيد الفاضل
هل يوجد اداة بها البحث مباشر بدلا من الكود
لا التعبئة نختلف من فورم الي اخر

RE: عرض عنصر في الكمبوبوكس - اسامه الهرماوي - 02-12-18

(20-11-18, 02:32 PM)atefkhalf2004 كتب : السادة الافاضل
اريد حلا

اخي انظر هذه الاكواد في
الاكسس لعلها تنفعك.

RE: عرض عنصر في الكمبوبوكس - اسامه الهرماوي - 05-01-19

ضع قبل هذا الكود ..

كود :

 On Error Resume Next