下列子过程的功能是:当前数据库文件中的“学生表”的学生“年龄”都加1,请在程序空白处填写适当的语句,使程序实现所需的功能。 Private Sub SetAgePlus1_Click() Dim a As DAO.Datahase Dim rs As DAO.Recordset Dim fd As DAO.Field Set db=CurrentDb() Set rs=db.OpenRecordset("学生表") Set fd=rs.Fields("年龄") Do While Not rs.EOF rs.Edit fd= (14) rs.Update (15) Loop rs.Close db.Close Set rs=Nothing Set db=Nothing End Sub