RosettaCodeData/Task/Loops-Foreach/BASIC/loops-foreach-16.basic

6 lines
88 B
Plaintext

items = Array("Apple", "Orange", "Banana")
For Each x In items
WScript.Echo x
Next