منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] بحث في قاعده البيانات من خلال combobox - نسخة قابلة للطباعة

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



بحث في قاعده البيانات من خلال combobox - سنان عبدالله سنان - 01-05-17

السلام عليكم 
محتاج مساعده 
سويت استعلام من قاعده البيانات باستخدام شرط ولاكن عند حذف حرف من محتوى combobox تتكرر البيانات 
انا اريد عند حذف اي حرف محتوى الكمبوبوكس تظهر البيانات المطابقه فقط دون تكرار


وهاذا الكود
كود :
 'البحث في كومبوبوكس حسب الشرط
       Dim da As OleDbDataAdapter = New OleDbDataAdapter("select* from class where classname like '%" & ComboBox1.Text.Trim & "%'  ", con)

       Dim dt As New DataSet()


       da.Fill(dt, "x")

       

       For Each r As DataRow In dt.Tables("x").Rows
           ComboBox1.Items.Add(r.Item("classname"))

       Next



RE: بحث في قاعده البيانات من خلال combobox - حريف برمجة - 02-05-17

بعد هذا السطر
Dim dt As New DataSet()

ضع هذا السطر
dt.clear


RE: بحث في قاعده البيانات من خلال combobox - ابو ليلى - 02-05-17

جرب هكذا , اذا كنت تقصد التكرار داخل ComboBox1.Items

PHP كود :
      For Each r As DataRow In dt.Tables("x").Rows

                    if comboBox1
.Items.Contains(r("classname")=False Then
                        comboBox1
.Items.Add(r("classname"))
 
                   End if

 
      Next