Public Class Tester Public Shared Sub Main Dim fruitArray() As String = {"Oranges", "Apples", "Grapes", "Bananas", "Blueberries"} For Each fruit As String In fruitArray Console.WriteLine(fruit) Next fruit End Sub End Class
Oranges Apples Grapes Bananas Blueberries