hola! soy nueva por aqui y estoy aprendiendo visual basic, se que para muchos esto resultara facil, pero yo no logro entender porque no me da el resultado adecuado.

si alguien me puede indicar que estoy haciendo mal, para poder corregir... estamos viendo arreglos en 2d..


este es el problema y lo que tengo hasta ahorita

.       Se tienen las estaturas del grupo de estudiantes de programación 2, grupo 03 y se desea por medio de un programa encontrar la estatura más alta, la más baja y el promedio de estaturas del grupo.
2.  Sub Main()
3.          Dim estudiantes, suma, promedio, may, menor As Double
4.          Console.WriteLine("cuantos estudiantes desea ingresar:")
5.          estudiantes = Console.ReadLine
6.          Dim estatura(estudiantes) As Double
7.          Dim i As Integer
8.          For i = 0 To estudiantes - 1
9.              Console.WriteLine("ingrese la estatura del estudiante:" & i + 1)
10.             estatura(estudiantes) = Console.ReadLine
11.             suma = estatura(estudiantes) + suma
12.         Next
13.        
14.         may = 0
15.         For i = 0 To estatura(estudiantes)
16.             If estatura(estudiantes) >= may Then
17.                 may = estatura(i)
18.             End If
19.  
20.         Next
21.         menor = 0
22.         For i = 0 To estatura(estudiantes)
23.             If estatura(estudiantes) < menor Then
24.                 menor = estatura(estudiantes)
25.             End If
26.         Next
27.         promedio = suma / estudiantes
28.  
29.         Console.WriteLine(" el Mayor de la estatura es de:" & may)
30.         Console.WriteLine(" el Menor de la estatura es de:" & menor)
31.         Console.WriteLine(" el promedio de la estatura es de:" & promedio)
32.         Console.ReadLine()
33.  
34.  
35.  
36.     End Sub

lo que me esta fallando es que no logro encontrar la estatura menor  y mayor, el promedio si me funciona.....