Question

关于VB Excel数据库的问题

我用VB写了一个程序来读取Excel的数据，其中有一栏是读取纯数字的，但是在VB的Text里却无法显示，请各位指点。部分程序如下：
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim MyPath As String

MyPath = App.Path

If Right$(MyPath, 1) <> "\" Then MyPath = MyPath & "\"

cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & MyPath & "Master_RMA_2010.xls;" & "Extended Properties=""Excel 8.0;"""

rs.Source = "select * from [Sheet1$]"

rs.Open "Select * from [Sheet1$]", cnn, adOpenKeyset, adLockOptimistic

Text1.Text = rs.Fields(0).Value
Text2.Text = rs.Fields(1).Value
对应的表里有数据

Answer 1

记得是在边接字串里有个是否包含标题的开关，忘了是什么了，可以去找一下。
如果安装了EXCEL软件，直接用EXCEL对象调用EXCEL多简单啊，也不是太慢。还可以直接使用EXCEL的宏，公式什么的。

Answer 2

代码好像没有错，是不是表里没有数据呢？