单项选择题

采用ADO完成对“教学管理.accdb”文件中“学生表”的学生年龄都加1的操作，程序空白处应填写的是______。
Sub SetAgePlus()
Dim en As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dimfd As ADODB.Field
Dim strConnect As String
Dim strSQL As String
Set cn=CurrentProject.Connection
strSQL="Select年龄from学生表"
rs.Open strSQL,en,adOpenDynamic,adLockOptimistic,adCmdText
Setfd = rs.Fields("年龄")
Do While Not rs.EOF
fd=fd+1
______
rs.MoveNext
Loop
rs.Close
en.Close
Set rs=Nothing
Set cn=Nothing
End Sub

点击查看答案&解析