Imports System

imports microsoft.visualbasic

Public Module Module1

    Public Sub Main()

        'TASK 1 

        dim sname as string = "Sharif"

        dim fname as string  = "Abdul"

        console.writeline ( fname & " " & sname) ' Abdul Sharif

        console.writeline ( left(fname,1)  & " " & sname) 'A Sharif

        console.writeline ( sname  & ", " &  fname) 'Sharif, Abdul

        console.writeline ( "Mr " & left(fname,1)  & " " & sname) 'Mr A Sharif

        Console.Writeline ("Dear Mr " & sname) 'Dear Mr Sharif

        Console.Writeline ("First Name: " & fname & ",Second Name:" & sname) 'First Name: Abdul, Second Name: Sharif 

        Console.Writeline (fname &" " & ucase(sname)) 'Abdul SHARIF

        'TASK 2 

        dim id as string

        console.writeline ("Enter ID")

        id = console.readline() 

        'format check

    End Sub

End Module