Language Basics VisualBasic Script

Option Explicit
Dim Sales
Sub Scope1()
  Sales = Sales + 1
  MsgBox Sales
End Sub
Sub Scope2()
  Sales = Sales + 10
  MsgBox Sales
End Sub