2. 计算机
  3. 子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。 Sub Plus() Dim ws As DAO．Workspace Dim db As DAqO．Database Dimrs As DAO．Recordset Dim fd As DAO．

子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。 Sub Plus() Dim ws As DAO．Workspace Dim db As DAqO．Database Dimrs As DAO．Recordset Dim fd As DAO．

admin2019-05-23  66
问题 子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。
Sub Plus()
Dim ws As DAO．Workspace
Dim db As DAqO．Database
Dimrs As DAO．Recordset
Dim fd As DAO．Field
Set db=CurrentDb()
Set rs=db．OpenRecordset("教师表")
Set fd=rs．Fields("工龄")
Do While【    】
rs．Edit
fd=fd+1
rs．Update
rs．MoveNext
Loop
rs．Close
db．Close
Set rs=Nothing
Set db=Nothing
End Sub
程序空白处【    】应该填写的语句是
选项 A、db．EOF
B、rs．EOF
C、Notdb．EOF
D、Notrs．EOF
答案D
解析 EOF函数的作用是判断是否到达记录的结尾，在到达结尾前，该函数的返回值都是False，本题需要对当前库中“教师表”的工龄字段都加1，使用Do While…Loop循环结构，依次取出每条语句，条件语句用于判断记录指针是否到达记录集的结尾，如果没有，rs．EOF返回false，Not rs．Eof返回true，则继续向下移动记录指针，如果记录指针到达记录集的结尾，rs．EOF返回true，Not rs．EOF返回false，结束循环。
转载请注明原文地址:https://www.kaotiyun.com/show/ix0p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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