3. Create a console application that uses a For-Each loop to iterate through an array of strings and displays each element.
Module Module1
Sub Main()
' Declare and initialize
an array of strings
Dim myArray() As String = {"Apple", "Banana", "Orange", "Grapes"}
' Use a For-Each loop to
iterate through the array
For Each fruit As String In myArray
' Display each element
Console.WriteLine(fruit)
Next
' Wait for user input
before closing the console window
Console.WriteLine("Press any key to
exit...")
Console.ReadKey()
End Sub
End Module