Imports System

Public Module Module1

    Public Sub Main()

        console.WriteLine("Enter your name") 

​

            dim x as single = console.ReadLine()

​

        if x = "admin" then

​

            console.WriteLine("welcome admin")

​

        elseif x = "user" then 

​

            console.WriteLine ("welcome user")

​

        elseif x = "Name"

​

            console.WriteLine 

    End Sub

End Module