استخدام الdistinct لمنع التكرار

السلام عليكم ورحمة الله وبركاته

انا استخدم الفجول بيسك مع الاكسس

عندي الفورم فيها اكثر من

list

وبيانات هذي الفورم من الداتا بيس

لمنع التكرار استخدمت

distinct

لكن اذا اخترت اكثر من عمود يصير عندي مشكله ان الست ماتظهر فيها البيانات

الكود كما يلي

 dim sSELECT As String = "SELECT distinct(student_name,student_city) FROM student"

			cmd.CommandText = sSELECT
			cmd.Connection = conn
			daBugs.SelectCommand = cmd
			conn.Open()

			daBugs.Fill(dsBugs, "student")

			conn.Close()
			Dim aRow As DataRow

			For Each aRow In dsBugs.Tables("student").Rows
				ComboBox1.Items.Add(aRow("student_name"))
			Next

		  For Each aRow In dsBugs.Tables("student").Rows
				ComboBox2.Items.Add(aRow("student_city"))
			Next

اذا كتبيتها

Const sSELECT As String = "SELECT distinct(student_city) FROM student"

تتعبى الست بشكل صحيح وبدون تكرار

ارجو المساعده وشكرا