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