选择题
采用ADO对“职工管理.accdb”文件中“职工表”的字段“退休年龄”加5。
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=CmxentProject.Connection
strSQL='Select 退休年龄 from 职工表'
rs.Open strSQL,cn,adOpenDynamic,adLockOptimistic,adCmdText
Set fd=rs.Fields('退休年龄')
Do While Not rs.EOF
fd=fd+5
______
rs.MoveNext
Loop
rs.Close
cn.Close
Set rs=Nothing
Set cn=Nothing
End Sub
程序中______处应填写的语句是______。