Mega Code Archive

 

Categories / VB.Net / Class

 

Shared Method Demo

Imports System public class MainClass    Shared Sub Main()         Dim c1 As New C()         Dim c2 As New C()         c2.Test()         c.SharedTest()    End Sub End Class Class C     Public Shared Sub SharedTest()         Static x As Integer         x = x + 1         console.WriteLine(x)     End Sub     Public Sub Test()         Static x As Integer         x = x + 1         console.WriteLine(x)     End Sub End Class