下列子过程的功能是：将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白的地方填写适当的语句，使程序实现所需的功能：Private Sub SetAgePlus1_Click() Dim db As DAO.Database 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 = 【 】 rs.Update 【 】 Loop rs.Close db.Close Set rs = Nothing Set db = Nothing End Sub

混合并购是指一个企业对那些与自己生产的产品不同性质和种类的企业进行并购的行为，其中目标公司与并购企业既不是同一行业，又没有纵向关系。
根据上述定义，下列属于混合并购的是( )。

A．某碳酸饮料公司收购了一家灌装公司和一家饼干公司
B．某网站收购了一家户外传媒公司和一家网络游戏公司
C．某出版集团收购了一家印刷厂和一家文学网站
D．某电脑集团收购了一家酒厂和一家葡萄庄园