[silverlight]

متهيالي ممكن تستخدم الكود ب الشكل التالي لإدخال البيانات المتشابهة الي الكومبوبوكس

كود :

Dim myDictionary As Dictionary(Of String, String) = New Dictionary(Of String, String)
        myDictionary.Add("1", "Ahmed")
        myDictionary.Add("2", "ahmed")
        myDictionary.Add("3", "Ahmed")

        ComboBox1.DataSource = New BindingSource(myDictionary, Nothing)
        ComboBox1.DisplayMember = "Value"
        ComboBox1.ValueMember = "Key"

في الحدث الخاص ب الكومبوبوكس و هو SelectedIndexChanged ضع الكود بالشكل التالي...انا فقط أضفت Labels للتوضيح يمكن أن تتعامل مع النتائج كما يحلو لك

كود :

Me.Label1.Text = CType(ComboBox1.SelectedItem, KeyValuePair(Of String, String)).Value
Me.Label2.Text = CType(ComboBox1.SelectedItem, KeyValuePair(Of String, String)).Key