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

admin2020-06-06  69
问题 子过程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，ca，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/A40p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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