2. 计算机
  3. 子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。 Sub Plus() Dim en As New ADODB．Connection Dim rs As New ADODB．Recordset Dim fd A

子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。 Sub Plus() Dim en As New ADODB．Connection Dim rs As New ADODB．Recordset Dim fd A

admin2021-04-27  61
问题 子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。
    Sub Plus()
    Dim en 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 Not rs．EOF
    fd＝fd＋1
    rs．Update
    【    】
    Loop
    rs．Close
    cn．Close
    Set rs＝Nothing
    Set cn＝Nothing
    End Sub
    程序空白处【    】应该填写的语句是(    )。
选项 A、rs．MoveNext
B、cn．MoveNext
C、rs．Next
D、cn．Next
答案A
解析 本题考查的是使用ADO数据库技术操作数据库。选项中RecordSet对象rs是用来表示来自基本表或命令执行结果的记录集。当rs更新完一条记录之后，需要使指针往后移动到下一个记录故选择A选项。
转载请注明原文地址:https://www.kaotiyun.com/show/e0Sp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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