[new_programer]

السلام عليكم
لدى جملة استعلام اريد عرض عرض بيانات العملاء بدون تكرار الاسماء اكتر من مرة

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

كود :

  tb_table.Clear()
       Dim cmd As New OleDbCommand("SELECT custCode,custName,custID,tel from tblCustomers Group By [custCode]", con)
       con.Open()
       tb_table.Load(cmd.ExecuteReader)
       dvgView.DataSource = tb_table
       con.Close()

الجملة لا تعمل
 والكود التالي يعمل لكن مع عرض كل البيانات لا يعمل
ومع عرض اكتر من حقل لا يعمل

كود :

 Dim qury As String = "SELECT custCode,custName,custID,custAddress,custTel FROM tblCustomers Group By [custCode] "
       adapter2 = New OleDbDataAdapter(qury, con)
       adapter2.Fill(ds, "cust")
       dvgCustomer.DataSource = ds.Tables("cust")