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

子过程Plus完成对当前库中"学生表"的年龄字段都加1的操作。 Sub Plus( ) Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset

admin2015-07-01  55
问题 子过程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 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更新完一条记录之后，需要使指针往后移动到下一个记录（注：MoveNext，移动到下一个记录的位置）。因此，本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/Togp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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