上面的回复是错误的,由于ado.net 中的对象大都是 从objectbyval 继承的,不能简单的把一个存在于dataset 中的对象添加到另一个dataset 中,就如下
dim row as datarow, col as datacolumn,rownew as datarow
dim i as integer
for each row in table1
rownew =table2.newrow()
for i=0 to row.items.count-1
rownew(i)=row(i)
next i
table2.rows.add(rownew)
next