Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Static Variables

Private Sub cmdLocalAge_Click()   Dim intAge As Integer   intAge = intAge + 1   Debug.Print intAge End Sub Private Sub cmdStaticAge_Click()   Static sintAge As Integer   sintAge = sintAge + 1   Debug.Print sintAge End Sub