Imports System
Public Class MainClass
Shared Sub Main(ByVal args As String())
Dim values(10) As Integer
For i As Integer = 0 To 10
values(i) = i
Next i
Array.Reverse(values)
Dim txt As String = ""
For i As Integer = 0 To 10
Console.WriteLine( values(i) )
Next i
End Sub
End Class