Data Type VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type
  4. Create an Array, assign value and use Loop to show its value
Sub aSub()
    Dim cities(3) As String
    Dim city As Variant
    cities(0) = "0"
    cities(1) = "A"
    cities(2) = "B"
    cities(3) = "C"
    For Each city In cities
        MsgBox city
    Next
End Sub