data控件的用法？

Question

data1.recorderset.findfirst "字段='值'"

Answer 1

給你個例子:
sub()
Dim daodb As Dao.Database
Dim daors As Dao.Recordset Set daodb = OpenDatabase(App.Path & "\adodao.mdb")
 Set daors = daodb.OpenRecordset("select * from table where 字段=*", 2)
 If daors.RecordCount > 0 Then
    daors.MoveLast
    daors.MoveFirst End If
end sub