Imports System

Imports MIcrosoft.VisualBasic

​

Public Module Module1

    Public Sub Main()

        'Declaring varibles

        Dim a As Integer

        Dim b As Integer

        a=23

        b=23

        Console.Write("Addition:")

        Console.WriteLine(a+b)

    end sub

        Sub input

        Dim surname As String

        Console.WriteLine("What is your surname?")

        surname=Console.ReadLine

        Console.WriteLine("Hello" + surname)

        'This is so the program oes not terminate

        Console.Read()

        end sub

    sub replacement

        Dim surname,surnamel,cgt,cgt1 As String

        Console.WriteLine("What is your name?")

        surname=Console.ReadLine

        cgt=GetChar(surname,3)

        Console.WriteLine(cgt)

        cgt1=cgt.ToUpper()

        Console.WriteLine(cgt1)

        surnamel=surname.Replace("dd","23")

        Console.WriteLine(surnamel)

        'This is so the program does not terminate automatically

        Console.Read()

    End Sub

End Module