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

نسخة كاملة : تعديل كود البحث في حقل معين وإظهار النتيجة في الكومبو بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

أريد التعديل على هذا الكود
هذا الكود يقوم بجلب جميع البيانات الموجودة في الحقل it2 بشرط po2 يساوي false
وإظهار النتيجة في combobox وهو شغال تمام
أريد التعديل عليه بحيث يقوم بفرز البيانات في الحقلit2 ولا يظهر تكرار البيانات
مثلا الحقل it2 موجود فيه 5 بيانات هي احمد ، محمد ، احمد ، علي ، خالد
تكون النتيجة احمد ، محمد ، على ، خالد
PHP كود :
Dim cnStr As StringcmdText As String

        SQLstr 
"SELECT  it2 FROM mate WHERE po2 = False" 

 
       newConnection.Open()
 
       Dim DataAdapter1 As New OleDbDataAdapter(SQLstrnewConnection)
 
       DataAdapter1.Fill(DataSet1"pym")
 
       newConnection.Close()

 
       Dim i As Integer
        For i 
0 To DataSet1.Tables("pym").Rows.Count 1
            ComboBox1
.Items.Insert(iDataSet1.Tables("pym").Rows(i).Item("pna3"))
 
       Next 
تم إيجاد الحل ، آسف على إزعاجكم
تم وضع كلمة DISTINCT بعد كلمة SELECT
PHP كود :
SQLstr "SELECT DISTINCT it2 FROM mate WHERE po2 = False"