[Resolved] Determine the member of a type with the highest value

[TokersBall_CDXX]

having a hard time determining which member of a private type has the highest value.

Bubble Sorting doest appear loggical, or if it does I just can't see it from this view...

Private Type ThisIsATest
 lThisisALong as long
 sThisIsAName as string
End Type
Dim Test(39) as ThisIsATest
 
 
Private Sub Form_Load()
 
Test(0).lThisisALong = 4123
Test(1).lThisisaLong = 31
Test(2).lThisisaLong = 312355
End Sub

any ideas how to determine which is the highest?