如何把MSFlexGrid控件显示的内容写入Excel 2003,高手帮忙

Question

提供点代码，或者提供点参考文章，谢谢

Answer 1

'生成Excel对象   
Set   exl   =   New   excel.Application   
'生成Excel空工作表   
exl.Workbooks.Add   
for i=0 to 表格控件行数-1
For   j   =   0   To   表格控件列数-1
'将数据写入表格   
exl.Cells(i   +   1,   j   +   1)   =   表格控件.cells(j,   i)  '大概，根据实际所用的表格控件属性
Next   
next
'移动焦点   
exl.Range("A1").Select   
'显示生成的表格   
exl.Visible   =   True