Imports System
Class Example
Public Shared n As Integer
End Class
Public Class Test
Public Shared Sub Main()
Example.n = 100
Console.WriteLine(Example.n)
Example.n = 3
Console.WriteLine(Example.n)
Example.n = -9
Console.WriteLine(Example.n)
End Sub
End Class
' Run:
'
' 100
' 3
' -9