arreglos en vb.net - invertir

[fanely]

me pueden indicar cual es el algoritmo o el codigo para invertir un arreglo, por favor.
este es el que estoy usando
For i = 1 To 5 Step 1
For j = 5 To 1 Step -1
aux = datos(i)
datos(i) = datos(j)
datos(j) = aux
Next
Me.ListBox2.Items.Add(datos(i))
Next

ingreso: 5,3,7,2,5
y me aparece: 3,3,2,3,5

gracias por sus respuestas