items = Array("Apple", "Orange", "Banana")

For Each x In items
    WScript.Echo x
Next