关于mshflexgrid的问题

Question

我现在有一个mshflexgrid表格控件里面通过数据填充已经有了数据，
我现在想把mshflexgrid中的数据复制到一个对象，中去我下面的做法怎么不行呢。
dim test as adodc.recordset
 test=mshflexgrid.record
请问哪位高手有什么好办法实现我想做的呀，

Answer 1

dim i,j as integer
for i=0 to mshflexgrid.rows-1
   for j=0 to mshflexgrid.cols-1
       mshflexgrid.row=i
       mshflexgrid.col=j
       打开数据库，写入
   next j
next i