How to add multiple row in datatable using LinQ - vb.net

Question

I have 2 datatable dtMaster and dtResult
dtMaster
No Name Address Status
1 Andy Sesame Street Valid
2 Justin Guava Street Invalid
3 Taylor West Street Valid
If Status = Valid, I want to add 2 different rows in another datatable with template
No Name Address
1 Ms. Julie dtMaster("Address")
2 dtMaster("Name") dtMaster("Address")
Expected Result is
dtResult
No Name Address
1 Ms. Julie Sesame Street --> from 1st row in dtMaster
2 Andy Sesame Street --> from 1st row in dtMaster
1 Ms. Julie West Street --> from 3rd row in dtMaster
2 Taylor West Street --> from 3rd row in dtMaster
I tried this code, but it gives the type of ra1 (array) instead of the value I want, how to say :D
(From row1 In dtMaster
Let ra1 = {({"1","Ms. Julie",row1("Address")}),({"2",row1("Name"),row1("Address")})}
Select If(row1("Status").tostring="Valid",dtResult.Rows.Add(ra1),dtResult.Rows.Add(row1.itemArray))
).copytodatatable

Answer 1

System.Data.DataTable iteration is like this
' Declare DataTable
Dim dtResult As New DataTable()
' Define columns
dtResult.Columns.Add("No", GetType(System.Int32))
dtResult.Columns.Add("Name", GetType(System.String))
dtResult.Columns.Add("Address", GetType(System.String))
Dim index As Integer = 1;
For Each row As DataRow In dtMaster.Rows
If row.Items("Status") = "Valid" Then
' Add a row of data
dtResult.Rows.Add(index, row.Items("Name"), row.Items("Address"))
index += 1
End If
Next