Dim arr1() As String = {"Hello", "world", "I'm", "some", "text"}
Dim arr2() As String = {"Hello2", "world2", "I'm2", "some2", "text2"}
Dim arr3(0) As String = {"Hello", "Hello2"}
Dim arr3(1) As String = {"world", "world2"}
Dim arr3(2) As String = {"I'm", "I'm2"}
Dim arr3(3) As String = {"some", "some2"}
Dim arr3(4) As String = {"text", "text2"}
Dim arr1() As String = {"Hello", "world", "I'm", "some", "text"}
Dim arr2() As String = {"Hello2", "world2", "I'm2", "some2", "text2"}
Dim arr3 = arr1.Zip(arr2, Function(a, b) {a, b}).ToArray()