Imports System
Public Class Test
public Shared Sub r_print(n As Integer)
If (n > 0) Then
r_print(n - 1)
Console.Write("{0} ", n)
End If
End Sub
Public Shared Sub Main()
r_print(20)
End Sub
End Class
' run:
'
' 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
'