' Visual Basic 2008 9.0 .NET Examples - Local, Module and Static Variables - Procedures and Functions : 
Module Exercise3Task
    Sub Main()
        Test1()
        Test1()
        '
        Console.ReadLine()
    End Sub
    Sub Test1()
        Static t1 As Integer = 10
        t1 += 1
        Test2(t1)
        Test2(t1)
    End Sub
    Sub Test2(ByVal t2 As Integer)
        Static t3 As Integer = 20
        t3 += t2
        Console.WriteLine(t3)
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.