Imports System
Public Class Program
Public Shared Sub print1_to_N(ByVal number As Integer, ByVal N As Integer)
If number <= N Then
Console.Write(number & " ")
print1_to_N(number + 1, N)
End If
End Sub
Public Shared Sub Main()
Dim number As Integer = 1
print1_to_N(number, 31)
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 21 22 23 24 25 26 27 28 29 30 31
'