Home » VB.Net » VB.Net Programs

VB.Net program to print 1, 11, 31, 61, ..., 10 times using GoTo statement

By Nidhi Last Updated : November 16, 2024

Printing 1, 11, 31, 61, ..., 10 times using GoTo statement in VB.Net

Here, we will print the given series using the "GoTo" statement on the console screen.

Program/Source Code:

The source code to print 1,11,31,61, ... 10 times using the "GoTo" statement is given below. The given program is compiled and executed successfully.

VB.Net code to print 1, 11, 31, 61, ..., 10 times using GoTo statement

'VB.Net program to print 1, 11, 31, 61, ... 
'10 times using "GoTo" statement.

Module Module1
    Sub Main()
        Dim num As Integer = 1
        Dim cnt As Integer = 1
        Dim dif As Integer = 10

MyLabel:
        Console.Write("{0}, ", num)

        num = num + dif
        dif = dif + 10
        cnt = cnt + 1

        If cnt <= 10 Then
            GoTo MyLabel
        End If

        Console.WriteLine()
    End Sub
    
End Module

Output:

1, 11, 31, 61, 101, 151, 211, 281, 361, 451,
Press any key to continue . . .

Explanation:

In the above program, we created a module Module1 that contains a Main() method. In the Main() method, we created three variables num, cnt, and dif that are initialized with 1,1, and 10 respectively. Then we created the label MyLabel, which is used to transfer program control using the "GoTo" statement.

MyLabel:
    Console.Write("{0}, ", num)

    num = num + dif
    dif = dif + 10
    cnt = cnt + 1

    If cnt <= 10 Then
        GoTo MyLabel
    End If

Using the above code we find the given series on the console screen.

VB.Net Basic Programs »

---