1、“直接从表中的列取,而我是希望从drs集合中取”
其实都一样的，因为drs集合是从表中取得，集合中的这些列和表的列都完全一样，所以 Dim dc As Datacol=Datatables("BPB量产电池").Datacols("产品名称") 就是你所需要的。
2、drb("产品名称") = dra(dc.name)
从上下文看，完全不需要这个定义和写法，其实可以按照mr725的：
For Each dra As Datarow In drs '历遍drs 'Dim dc As Datacol=drs("产品名称")
Dim Drb As Datarow = Datatables("temp").AddNew() drb("产品名称") = dra("产品名称") ‘这样试一试··· Next
加好友 
发短信
F6
Post By：2010/9/29 14:46:00 [显示全部帖子]
