I want to put a loop on this program
Where it says If repeater = Y I want it to go back to the top of the program.Code:Module Module1 Class Arithmetical Public Function Add(ByVal A As Integer, ByVal B As Integer, ByVal C As Integer) Return A + B + C End Function Public Function Mult(ByVal A As Integer, ByVal B As Integer, ByVal C As Integer) Return A * B * C End Function End Class Sub Main() Dim obj As New Arithmetical Dim A, B, C, Sum, Product As Integer Dim Repeater As String Console.WriteLine("Please enter a number value.") A = Console.ReadLine B = Console.ReadLine C = Console.ReadLine Sum = (obj.Add(A, B, C)) Console.WriteLine("Here is the result when the numbers are added:") Console.WriteLine(Sum) Product = (obj.Mult(A, B, C)) Console.WriteLine("Here is the result when the numbers are divided:") Console.WriteLine(Product) Console.WriteLine("Would you like to run this program again? Y/N") Repeater = Console.ReadLine If Repeater = "Y" Then End If Console.ReadKey() End Sub End Module
How would I go about doing this?




Reply With Quote