Imports System

Public Module Module1

    Dim hiro as Integer =1

    Public Sub Main()

        While hiro <= 12

        Console.WriteLine(hiro)

        hiro = hiro + 1

            If hiro >= 5 and hiro <= 7 Then

        hiro = hiro + 1

        Continue While

                end if

                    if hiro = 12 then

        Console.WriteLine(hiro) 

        hiro = hiro + 1

        Exit While

        End If

    End While

    End Sub

End Module