rob33n adlı üyeden alıntı: mesajı görüntüle
Bir Dictionary yarat ve içerisine textbox değerlerini at.Her aynı değerde artır.
1 textbox %10 değerinde. Son hesaplamasını sen yaparsın sanırım. Kaç tane textbox dolu ise ona göre oranı sen belirle. Ben 10 textbox'un da dolu olduğunu varsayarak 10 verdim.

Dictionary<int, string> dic = new Dictionary<int, string>();
foreach (Control ctrl in this.Controls)
{
	if (!dic.ContainsKey(ctrl.Text))
		dic.Add(ctrl.Text, 10);
	else
	{
		for (int i = 0; i < dic.Count; i++)
		{
			var item = dic.ElementAt(i);
			var itemKey = item.Key;
			var itemValue = item.Value;
			dic[i] = itemValue + 10;
		}
	}
}
Vb.net olduğu için kodları anladığım kadarıyla uyarlamaya çalıştım. nereden yanlış yapıyor olabilirim
Dim dic As New Dictionary(Of String, String)()
        For Each ctrl As Control In Panel2.Controls
            If Not dic.ContainsKey(ctrl.Text) Then
                dic.Add(ctrl.Text, 10)
            Else
                For i As Integer = 0 To dic.Count - 1
                    Dim item = dic.ElementAt(i)
                    Dim itemKey = item.Key
                    Dim itemValue = item.Value
                    dic(i) = itemValue + 10
                Next
            End If
        Next
        ListBox1.DataSource = New BindingSource(dic, Nothing)