采用 ADO 完成对"教学管理.mdb"文件中"学生表"的学生年龄都加1的操作,程序空白处应填写的是 Sub SetAgePlus( ) Dim cn As New ADODB.Connection Dim rs As New ADODB.

admin2015-07-01  34

问题 采用 ADO 完成对"教学管理.mdb"文件中"学生表"的学生年龄都加1的操作,程序空白处应填写的是
Sub SetAgePlus( )
    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.MoveNext
    Loop
    rs.Close
    cn.Close
    Set rs = Nothing
    Set cn = Nothing
End Sub

选项 A、rs.Edit
B、rs.Update
C、Edit
D、Update

答案B

解析 本题考查的是对数据库的编程,主要是对记录集的操作,在完成对"学生表"的学生年龄都加1的操作之后,需要更新数据表中的相应记录,用rs.Update表示。
转载请注明原文地址:https://jikaoti.com/ti/iH20FFFM
0

随机试题
最新回复(0)