Imports System

Public Module Module1

    Public Sub Main()

        dim Sum as Integer

        dim FirstValue as Integer

        dim SecondValue as Integer

        Console.WriteLine("Basic Calculator")

        Console.WriteLine("Enter the first number")

        FirstValue=Console.ReadLine()

        Console.WriteLine("Enter the second number")

        SecondValue=Console.ReadLine()

        Sum = FirstValue + SecondValue

        Console.WriteLine(Sum)

    End Sub

End Module

Public Module Module2

    Public Sub Main()

        dim Difference as Integer

        dim FirstValue as Integer

        dim SecondValue as Integer

        Console.WriteLine("Basic Calculator")

        Console.WriteLine("Enter the first number")

        FirstValue=Console.ReadLine()

        Console.WriteLine("Enter the second number")

        SecondValue=Console.ReadLine()

        Difference = FirstValue - SecondValue

        Console.WriteLine(Difference)

    End Sub

End Module

Public Module Module3

    Public Sub Main()

        dim Product as Integer

        dim FirstValue as Integer

        dim SecondValue as Integer

        Console.WriteLine("Basic Calculator")

        Console.WriteLine("Enter the first number")

        FirstValue=Console.ReadLine()

        Console.WriteLine("Enter the second number")

        SecondValue=Console.ReadLine()

        Product = FirstValue * SecondValue

        Console.WriteLine(Product)

    End Sub

End Module

Public Module Module4

    Public Sub Main()

        dim Qoutient as Integer

        dim FirstValue as Integer

        dim SecondValue as Integer

        Console.WriteLine("Basic Calculator")

        Console.WriteLine("Enter the first number")

        FirstValue=Console.ReadLine()

        Console.WriteLine("Enter the second number")

        SecondValue=Console.ReadLine()

        Qoutient = FirstValue / SecondValue

        Console.WriteLine(Qoutient)

    End Sub

End Module