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