Imports System

Public Module Module1

    Public Sub Main()

        Dim Num As Integer 

        For Num = 0 to 70 Step 7

        Console.Writeline(Num)

    Next

End Sub 'By Jenan and Raphaela 9A'

End Module