Imports System

Public Module Program
    Public Shared Sub Main (ByVal args As String())
        Dim x As Integer = 0

        Console.WriteLine (x)

        Test (x)
        Console.WriteLine (x)

        Test ((x))
        Console.WriteLine (x)
    End Sub

    Public Shared Sub Test (ByRef x As Integer)
        x = x + 1
    End Sub
End Module