Imports System

Public Module Module1

    Public Sub Main()

        dim operand1 as integer

        dim operand2 as integer

        dim operation as string 

        console.WriteLine("Please enter operand 1")

        operand1=console.Readline()

        console.WriteLine("Please enter opeand 2")

        operand2=console.Readline()

        console.WriteLine("Please enter operation")

        operation=console.ReadLine()

        select case operation

        case "+"

            console.WriteLine(operand1+operand2)

            case "-"

            console.WriteLine(operand1-operand2)

        case "*"

            console.WriteLine(operand1*operand2)

        case "/"

            console.WriteLine(operand1/operand2)

        end select

    End Sub

End Module