Question

vb中如何将excel中的数据读入并存入数组中

vb中如何将excel中的数据读入并存入数组中可以先创建1个Excel的Application对象，然后用此对象来操作Excel的其它对象：如工作簿、工作表、窗口等等。简单示例1下：Set xlApp=CreateObject(Excel.Application) 创建Application对象xlApp.Visible=True 设置为可见，缺省为不可见Set xlBook=xlApp.Workbooks.Open (d:\1.xls) 打开工作簿Set xlSh=xlBook.Worksheets(Sheet2)For i=1 to 100 MyArray(i)=xlSh.Cells(i,1).Value 读出数据存入数组Next i

Answer 1

先建立数据库连接，再传入查询语句，最后调用fill就能够了 查看原帖>>

希望采纳