Module Module1
Sub Main()
Dim intArr() As Integer = New Integer() {1, 2, 3, 4}
Dim strArr() As String
strArr = Array.ConvertAll(Of Integer, String)(intArr, Function(x) x.ToString())
For Each element As String In strArr
Console.WriteLine(element)
Next
End Sub
End Module
'run:
'
' 1
' 2
' 3
' 4