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

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

admin2018-12-05  37
问题 子过程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．Updte
【    】
Loop
rs．Close
ca．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/xMMp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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