rt,vb中如何把excel表导入到grid中

解决方案 »

  1.   

    把Excel当作数据库来操作(这样速度快)
    或用Excel对象来做,读取数据,然后循环导入
      

  2.   

    读取数据然后一条条的导进去,循环操作因为数据量大很慢。如何把excel像数据库那样读?难道写成结构体数组么?
      

  3.   

    当作数据库操作:'引用ado:工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)
    Private Sub Form_Load()
        Dim cn As New ADODB.Connection, rs As New ADODB.Recordset
        cn.CursorLocation = adUseClient
        cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\temp.xls;Extended Properties='Excel 8.0;HDR=Yes'"
        rs.Open "select * from [Sheet1$]", cn, adOpenDynamic, adLockOptimistic
        Set DataGrid1.DataSource = rs
    End Sub
      

  4.   

    [Sheet1$]这个是啥玩意?excel表的sheet吗?好象有点问题呀。谢谢赐教
      

  5.   

    [Sheet1$]是指Excel表里的Sheet1工作簿
      

  6.   

    说错了
    [Sheet1$]是指Excel表里的Sheet1工作表
      

  7.   

    我怎么感[sheet1]这样写不对呢?