Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. Private module variable
Option Explicit
Private intModuleVariable As Integer
Public Sub TestProc1()
    intModuleVariable = intModuleVariable + 1
End Sub
Public Sub TestProc2()
    Debug.Print intModuleVariable
End Sub
Public Sub TestProc3()
    Dim intModuleVariable   As Integer
    intModuleVariable = 100
    Debug.Print intModuleVariable
End Sub