2. 计算机
  3. 子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。 Sub Plus() Dim WS As DAO．Workspace Dim db As DAO．Database Dim rs As DAO．Recordse

子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。 Sub Plus() Dim WS As DAO．Workspace Dim db As DAO．Database Dim rs As DAO．Recordse

admin2021-06-03  59
问题 子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。
    Sub Plus()
    Dim WS As DAO．Workspace
    Dim db As DAO．Database
    Dim rs As DAO．Recordset
    Dim fd As DAO．Field
    Set db＝CurrentDb()
    Set rs＝db．OpenRecordset("学生表")
    Set fd＝rs．Fields("年龄")
    Do While Not rs．EOF
    rs．Edit
    fd＝fd＋1
    rs．Update
    【    】
    Loop
    rs．Close
    db．Close
    Set rs＝Nothing
    Set db＝Nothing
    End Sub
    程序空白处【    】应该填写的语句是(    )。
选项 A、rs．MoveNext
B、cn．MoveNext
C、db．MoveNext
D、fd．MoveNext
答案A
解析 本题考查的是如何使用ADO数据库技术操作数据库。其中RecordSet对象rs是用来表示来自基本表或命令执行结果的记录集。rs更新完一条记录之后，需要使指针往后移动下一个记录上故选择A选项。
转载请注明原文地址:https://www.kaotiyun.com/show/Jnvp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)