Imports System
Imports System.Linq
Public Module Module1
Public Sub Main()
Dim Numbers = Enumerable.Range(1, 10)
For Each N In Numbers
Dim Sum As Integer
Sum += N
Console.WriteLine(Sum)
Next
End Sub
End Module