单选题 子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。 Sub Plus() Dim cn As New ADoDB.Connection Dim rs As New ADODB.Recordset Dim fd As ADODB.Field Dim strConnect As String Dim strSQL As String Set cn=CurrentProject.Connection strSQL="Select工龄from教师表" rs.Open strSQL.cn,adOpenDynamic,adLockOptimistic,adCmdText' Set fd=rs.Fields("工龄") Do While fd=fd+1 rs.Update rS.MoveNext Loop rs.Close ca.Close Set rs=Nothing Set cn=Nothing End Sub 程序中 内应填写的语句是
【正确答案】 A
【答案解析】解析:EOF函数的作用是判断是否到达记录的结尾,在到达结尾前,该函数的返回值都是False,本题需要对当前库中“教师表”的工龄字段都加1,使用Do While…Loop循环结构,依次取出每条语句,条件语句用于判断记录指针是否到达记录集的结尾,如果没有,rs.EOF返回false,Not rs.Eof返回true,则继续向下移动记录指针,如果记录指针到达记录集的结尾,rs.EOF返回true,Not rs.EOF返回false,结束循环。