Imports System

Imports Microsoft.VisualBasic

Public Module Module1

    Public Sub Main()

        Dim strInput as String

        Dim strOutput as String

        Console.WriteLine("Enter some text with at least 8 characters.")

        strInput = Console.ReadLine()

        strOutput = Right(strInput, 2)

        Console.WriteLine("The first 5 characters are: " & strOutput)

    End Sub

End Module