Private Sub 备注_Click()
Dim dbs As Database
Dim rst As Recordset
Dim strsql As String
dbs = curruntdb()
strsql = "select * from 表1"
Set rst = dbs.Execute(strsql)
Part Description
recordset: An object variable that represents an existing dynaset- or snapshot-type Recordset object.
criteria: A String used to locate the record. It is like the WHERE clause in an SQL statement, but without the word WHERE.