Imports System

Public Module Module1

    Public Sub Main()

        dim num1 as decimal

        dim num2 as decimal

        dim word as string

        dim total as decimal

        Console.WriteLine("hello please enter 2 numbers")

        console.writeline("enter your first number")

        num1 = console.readline()

        console.writeline("enter your second number")

        num2 = console.readline()

        Console.WriteLine("do you want to 1)add 2)subract 3)divide 4)multiply please enter 1 2 3 or 4")

        word = console.readline()

        if word = d then

            total = num1 + num2

        end if

    End Sub

End Module