Imports System

Public Module Module1

    Public Sub Main()

        Dim sum As Integer = 0  

    For i As Integer = 10 To 20 Step 2 

        Console.WriteLine("Loop: i=" & i)

        sum += i        

        Console.WriteLine("Sum=" & sum)

    Next

​

    End Sub

End Module