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  80
问题 子过程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、rs.MovePrevious
C、rs.MoveFirst
D、rs.MoveLast
答案A
解析 本题考查的是如何使用ADO数据库技术操作数据库。其中，RecordSet对象rs是用来表示来自基本表或命令执行结果的记录集。rs更新完一条记录之后，需要使指针往后移动下一个记录上（注：MoveNext，移动到下一个记录的位置）。因此，本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/yIgp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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