Sub Test() As Integer
  Static N As Integer = 1
  N *= 2
  Return N
End

Sub Test1() As Integer
  Static N As Integer = 1
  N *= 3
  Return N
End

Public BigString as string = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
Dim I As Integer
For I = 1 to 10
  Print Test();;":";;test1()
Next