I have an array with 26 columns and 2 rows. The first row contains the values 65 - 90 in ascending order. The second row will contain a range of numbers. I need to find the highest value in the second row and return the column number. Any help on how to do this? I've looked at some example code, but I can only find 1 dimensional arrays for max values.

In case it would help, here is my code:

(Ciphertext isn't currently there, but it would just be a piece of text)

Module Module1 Sub Main() Dim num As Integer 'Ciphertext goes between the two speech marks next line Dim ciphertext As String = UCase("") Dim array(25, 2) As Integer For a = 1 To 26 array(a - 1, 0) = a + 64 array(a - 1, 1) = 0 Next For b = 0 To ciphertext.Length num = Asc(ciphertext.Substring(b, 1)) Select Case num Case 65 To 90 array(num, 1) = array(num, 1) + 1 End Select Next End Sub End Module