Module Tester Sub Main() Dim firstNumber, secondNumber As String Dim number1, number2, sumOfNumbers As Integer firstNumber = 10 secondNumber = 20 number1 = firstNumber number2 = secondNumber sumOfNumbers = number1 + number2 ' add numbers Console.WriteLine("The sum is {0}", sumOfNumbers) End Sub ' Main End Module
The sum is 30