在vb6中如何导入excel文件

在vb6中如何导入excel文件？
导入后按照不同的算法将数据进行计算后在界面上输出显示 --------------------编程问答-------------------- 汗~
忘了给分
--------------------编程问答-------------------- MSDN里有的吧，我这没有装vb6，给你vb.net的资料看看，基本差不多

Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection

MyConnection = New System.Data.OleDb.OleDbConnection( _
      "provider=Microsoft.Jet.OLEDB.4.0; " & _
      "data source=C:\myData.XLS; " & _
      "Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
      "select * from [Sheet1$]", MyConnection)

DS = New System.Data.DataSet()
MyCommand.Fill(DS)
MyConnection.Close()


对于 Microsoft Excel 8.0 (97)、9.0 (2000) 和 10.0 (2002) 工作簿，请使用 Excel 8.0。 

对于 Microsoft Excel 5.0 和 7.0 (95) 工作簿，请使用 Excel 5.0。 

对于 Microsoft Excel 4.0 工作簿，请使用 Excel 4.0。 

对于 Microsoft Excel 3.0 工作簿，请使用 Excel 3.0。 


工作表名称后面必须跟$符号

补充：.NET技术 ,  VB.NET