[silverlight]

كود :

Dim list As New List(Of Integer)
       list.Add(1)
       list.Add(1)
       list.Add(1)
       list.Add(1)
       list.Add(2)

       For Each i As Integer In list
           If Not Me.ComboBox1.Items.Contains(i) Then Me.ComboBox1.Items.Add(i)
       Next