A3、A4型题   子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。
    Sub Plus()
    Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Reeordset
    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 Not rs.EOF
    fd=fd+1
    rs.Update
    ______
    Loop
    rs.Close
    cn.Close
    Set rs=Nothing
    Set cn=Nothing
    End Sub
    程序中______处应该填写的语句是______。
 
【正确答案】 A
【答案解析】本题考查的是使用ADO数据库技术操作数据库。选项中RecordSet对象rs是用来表示来自基本表或命令执行结果的记录集。当rs更新完一条记录之后,需要使指针往后移动到下一个记录(注:MoveNext,移动到下一个记录的位置)。因此,本题应选择选项A。