Imports System
Module Module1
Sub Main()
Dim intArray As Integer() = {1, 2, 3, 4, 5}
Dim strArray(intArray.Length - 1) As String
' Manual conversion
For i As Integer = 0 To intArray.Length - 1
strArray(i) = intArray(i).ToString()
Next
Console.WriteLine(String.Join(", ", strArray))
End Sub
End Module
'run:
'
' 1, 2, 3, 4, 5
'