打开数据库的问题。高手请进!

Question

如下程序哪里有问题:
Dim conn As New ADODB.Connection
Dim sr As New ADODB.Recordset
Dim sqlsr As New ADODB.Recordset
Dim constr As String
Private Sub Command1_Click()
constr = "DRIVER=Microsoft Excel Driver (*.xls);DefaultDir=C:\;DBQ=C:\chen.xls"
conn.Open constr
sr.CursorLocation = adUseClient
Set sr.DataSource = conn.Execute("select * from chen")
Set DataGrid1.DataSource = sr.DataSource
End Sub
 我只想用这种连接对象的execute方法来打开

Answer 1

Set sr.DataSource = conn.Execute("select * from SHEET1$")

Answer 2

上面的语句中chen是工作表内的数据区域的名称。是正角的
我就是想知道用execute方法打开的过程

Answer 3

加上这句。对于datagrid1加载数据应刻行的：
conn.cursorloacatoin=aduseclient