子过程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  33

问题 子过程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://jikaoti.com/ti/jao0FFFM
0

随机试题
最新回复(0)