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

子过程Plus完成对当前库中"学生表"的年龄字段都加1的操作。 Sub Plus( ) Dim ws As DAO.Workspace Dim db As DAO.Database Dim rs As DAO.Recordset Dim f

admin2021-02-23  60
问题 子过程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更新完一条记录之后，需要使指针往后移动下一个记录上（注：MoveNext，移动到下一个记录的位置）。因此，本题应选择A选项。
转载请注明原文地址:https://www.kaotiyun.com/show/xRSp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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