Module ClsModule Public a As Integer Class C1 End Class End Module Module MainModule Sub Main() ClsModule.a=20 End Sub End Module