假设数据库中有学生信息表 stud(sno,sname,ssex),其中 ssex 字段已建索引,要输出最后一名男同学的信息,程序空白处应填写的语句是 Private Sub Form_Load() Dim rs As ADODB.Recordset

admin2020-10-14  30

问题 假设数据库中有学生信息表 stud(sno,sname,ssex),其中 ssex 字段已建索引,要输出最后一名男同学的信息,程序空白处应填写的语句是
Private Sub Form_Load()
Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset
    rs.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= e:\考试中心教程\教学管理.mdb;"
    rs.CursorType = adOpenKeyset
    rs.LockType = adLockOptimistic
    rs.Index = "ssex"
    rs.Open  "stud" , , , , adCmdTableDirect
    ________________
    Debug.Print rs("sno "), rs("sname "), rs("ssex ")
    rs.Close
    Set rs = Nothing
End Sub

选项 A、rs.Find "男", adSeekFirstEQ
B、rs.Seek "男", adSeekFirstEQ
C、rs.Find "男", adSeekLastEQ
D、rs.Seek "男", adSeekLastEQ

答案D

解析 DAO的Seek 成员函数是在表类型记录集中基于表索引进行搜索记录,Find 成员函数是在动态集类型或快照类型记录集中进行搜索记录。因此本题中性别ssex字段已建索引,因此采用Seek成员函数。AdSeekFirstEQ 查找等于关键值的第一个关键字,AdSeekLastEQ 查找等于关键值的最后一个关键字。本题中要输出最后一名男同学的信息,因此使用AdSeekLastEQ。
转载请注明原文地址:https://jikaoti.com/ti/hMQ0FFFM
0

最新回复(0)