بدون دسته بندی

حذف ایتم تکراری در کمبوباکس


با سلام من از دیتا بیس کمبوباکس رو پر میکنم و میخوام آیتم ها تکراری نباشند . با کد زیر فقط اولین آیتم رو درست انجام میده و بقیه آیتم های تکراری حذف نمیشن ممنون میشم دوستان در صورت اطلاع پاسخ دهید سپاس

Using conn As New SqlConnection("Connection txt") 
conn.Open()
Dim cmd As New SqlCommand("select Diamonds from TBL_Jewellery", conn)
Dim dr As SqlDataReader = cmd.ExecuteReader()
Dim listName As IList(Of String) = New List(Of String)()
Do While dr.Read()
listName.Add(dr(0).ToString())
Loop
listName = listName.Distinct().ToList()
cmb_Lab.DataSource = listName
End Using



برنامه نویس
جهت کسب اطلاعات بیشتر به انجمن برنامه نویس مراجعه نمایید

دیدگاهتان را بنویسید

نشانی ایمیل شما منتشر نخواهد شد.

یک + 5 =

دکمه بازگشت به بالا