Imports System

Public Module Module1

    Public Sub Main()

        Dim Y As Integer = 0

        Y += 1 ' Y now equals 1

        Console.WriteLine(Y)

    End Sub

End Module