VB.NET Run command against 2 arrays - arrays

Question

I have read 2 text files into 2 arrays and simply want to run a command which uses the 2 arrays.
Example:
part1.txt(array 1)
hxxp://somethinghere.com\1
hxxp://somethinghere.com\2
part2.txt(array 2)
Bob
James
myprogram.exe hxxp://somethinghere.com\1 Bob
myprogram.exe hxxp://somethinghere.com\2 James
I simply want to run a for loop which goes through both arrays, here's what I have so far:
Dim part1() As String = IO.File.ReadAllLines("C:\part1.txt")
Dim part2() As String = IO.File.ReadAllLines("C:\part2.txt")
For Each line As String In part1
MsgBox(line)
Next
EDIT:
Working code:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim part1() As String = IO.File.ReadAllLines("C:\part1.txt")
Dim part2() As String = IO.File.ReadAllLines("C:\part2.txt")
For parse As Integer = 0 To part1.GetUpperBound(0)
MsgBox(String.Concat("myprog.exe " & """" & part1(parse) & """" & " -arg1 " & """" & part2(parse) & ".txt" & """"))
Next
End Sub
So it will look like this:
myprog.exe "hxxp://somethinghere.com" -arg1 "Bob.txt"

Answer 1

How about something like this?
Private Sub testMethod()
Dim part1() As String = New String() {"one", "two", "three"}
Dim part2() As String = New String() {"10", "20", "30"}
For parse As Integer = 0 To part1.GetUpperBound(0)
Debug.Print(String.Concat("command ", part1(parse), part2(parse)))
Next
End Sub

Answer 2

Take a look at Enumerable.Zip:
Enumerable.Zip(Of TFirst, TSecond, TResult) Method
Applies a specified function to the corresponding elements of two sequences, producing a sequence of the results.
So you could so something like
Dim part1() As String = IO.File.ReadAllLines("C:\part1.txt")
Dim part2() As String = IO.File.ReadAllLines("C:\part2.txt")
For Each element In part1.Zip(part2, Function(a, b) New With {a, b})
MsgBox(String.Format("{0} - {1}", element.a, element.b))
Next

Answer 3

First check that the arrays are the same length, then you can loop the indexes of one array and access the corresponding item in the other array.
To run the program you can use a ProcessStartInfo object to specify the parameters:
Dim part1() As String = IO.File.ReadAllLines("C:\part1.txt")
Dim part2() As String = IO.File.ReadAllLines("C:\part2.txt")
If part1.Length = part2.Length Then
For i As Integer = 0 To part1.Length - 1
Dim p As New ProcessStartInfo
p.FileName = "myprog.exe";
p.Arguments = """" & part1(i) & """ -arg1 """ & part2(i) & ".txt"""
Process.Start(p);
Next
Else
' Oops! different number of items in the files
' Tell the user
End If
You can set more properties in the ProcessStartInfo object to control how the program is started.