\\\
Dim ds as new dataset
Dim dt as new datatable("JohnsTable")
ds.tables.add(dt)
Dim dc1 as new datacolumn("Name")
Dim dc2 as new datacolumn("Valve")
Dim dc3 as new datacolumn("Time")
dt.columns.add(dc1)
dt.columns.add(dc2)
dt.columns.add(dc3)
for i as integer = 0 to ary1.length-1
dim dr as datarow = dt.newrow
dr("Name") = ary1(i)
dr("Valve") = ary2(i)
dr("Time") = ary3(i)
dt.rows.add(dr)
next
///
This asumes that the arys have all the same lenght and otherwise it will be
impossible in my opinion.
Never forget that when you do it not yourself, it is done for you, there is
no other way than moving data item by item in this kind of operations where
the memory positions of that data are not equeal.