Question

VB高手请进来，VB读取Excel问题

Dim Conn As New ADODB.Connection
Dim RS As New ADODB.Recordset

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & strName & ";Extended Properties='Excel 8.0;HDR=Yes'"

sql = "select * from [" & strSheetName & "$]"

RS.Open sql, Conn, 3, 3

假设excel只有3行数据，
如果用上述方法读取Excel中的数据的话，取出的数据行数，为excel的最大行数65536行

请问怎么解决？

另外，从2个excel文件读取数据（想写成select from 表a,表b），怎么读取呢？

Answer 1

问题1：如果只有3行数据，而取出是655536行的话，应该是你的表里有空格数据，将留下的三行数据之外的所有行选中，然后删除，再读出来的数据应该就只有3行了。列的处理方式与行的处理方式相同。
问题2：Excel不能用SQL语句同时选定两个表的内容！你可以用DataSet对象，将两表读入到DataSet对象里，然后用LinQ语句来查询！这样是行的通的。