要活学活用：
for each dr1 as datarow in datatables("xxx").Select("条件")
dim dr2 as datarow = datatables("xxx").Addnew
for each dc as datacol in datables("xxx").DataCols
dr2(dc.name) = dr1(dc.name)
next
加好友 
发短信
Post By：2011/11/12 16:48:00 [显示全部帖子]
