[luminat]

Ja sie tylko spytam na kit zapisujesz do tablicy ilosc wystepowania danych znakow, to jest absolutnie nie potrzebne. Najprosciej jest zrobic tak:

1. Zadeklarowac jedna tablice.
2. Wprowadzic do niej dane - za pomoca petli for
3.

For j = 65 To 90 - ta petla zaczyna sprawdzanie znakow ascii od A do Z
            licznik = 0 - ilosc wystapien znaku A
            For i = 0 To 9 - tu sprawdzamy wszystkie pola tablicy w poszukiwaniu danej litery, gdy j =65, wtedy liczymy ilosc wystapien znaku A
                If tablica(i) = Chr(j) Then
                    licznik = licznik + 1
                End If

            Next
            If licznik > 0 Then
                Console.WriteLine(CStr(Chr(j)) + ": " + CStr(licznik)) - po zakonczeniu wykonywania petli 'For i' wypisujemy ilosc wystapien danego znaku gdy np j=65, wypisujemy ilosc wystapien litery A
            End If
        Next