Imports System

Public Module Module1

    Public Sub Main()

        dim name as string

        name=console.Readline()

        if name= "admin" then

            console.WriteLine("welcome admin")

        elseif name ="user" then

            console.WriteLine("welcome user")

        else

            console.WriteLine("you entered a wrong user name")

        end if

        console.WriteLine("you have entered the user name {0}",name)

    End Sub

End Module