Imports System
Class Program
Public Shared Sub Main()
Dim N As Integer = 5
Dim sum_even As Integer
sum_even = N * (N + 1)
Console.WriteLine("The sum of the first {0} even numbers is: {1}", N, sum_even)
End Sub
End Class
' // 2 + 4 + 6 + 8 + 10 = 30
' run:
'
' The sum of the first 5 even numbers is: 30
'