Any help appricated

Question

If you run this code it will look

Number Table                                                                                                                                                        

1 1 1 1 1 1 1                                                                                                                                                       

2 2 2 2 2 2 2                                                                                                                                                       

3 3 3 3 3 3 3

but i supposed to get it to look like this im just confused on how to fix it if anyone could help me please.

Number Table   
1 2 3 4 5 6 7

2 4 6 8 10 12 14                                                                                                                                                               

3    6    9    12    15    18     21                                                                                                                                       
 

https://onlinegdb.com/HyY3h9kYI

Answer 1

There you go, use the below code:

Module VBModule
    Sub Main()
        dim decprincipal as decimal 
        dim decpayment as decimal 
        dim decrate as decimal 

            console.writeline("Number Table ")
            decRate = 1

            Do Until decRate > 3 
                Console.WriteLine(decrate.ToString("n0") & " " & decrate.ToString("n0") & " " & decrate.ToString("n0") & " " & decrate.ToString("n0") & " " & decrate.ToString("n0") & " " & decrate.ToString("n0") & " " & decrate.ToString("n0")) 
                'update the rate counter
                decRate += 1
            loop
    End Sub
End Module