Language Basics VisualBasic Script

Sub LifeTime()
  Dim Sales
  Sales = Sales + 1
  MsgBox Sales
End Sub