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