，平时成绩=平时作业×50%+小测验×10%+其中考试×40%，如果血色很难过平时成绩大于等于60分，则可以参加期末考试(“能否考试”字段为真)，否则学生不能参加期末考试。下面的程序按照上述要求计算每名学生的平时成绩并确定是否能够参加期末考试。请在空白处填入适当的语句，使程序可以完成所需要的功能。

Private Sub Command0_Click()

Dim db As DAO.Database

Dim rs As DAO.Recordset

Dim pazy As DAO.Field , xcy As DAO.Field , qzks As DAO.Field

Dim ps As DAO.Field , ks As DAO.Field

Set db = CurrentDb()

Set rs= db.OpenRecordset(“平时成绩表”)

Set pszy = rs.Fields(“平时作业”)

Set xcy = rs.Fields(“小测验”)

Set qzks = rs.Fields(“期中考试”)

Set ps = rs.Fields(“平时成绩”)

Set ks =rs.Fieldd(“能否考试”)

Do While Not rs.Eof

    Rs.Edit

    ps=       

    If ps >=60 Then

        ks = True

    Else

        ks = False

    End If

    rs.       

            rs.MoveNext

        Loop

        rs.Close

        db.Close

        Set rs = Nothing

        Set db= Nothing

End Sub

2011年9月计算机等级考试二级Access笔试答案

　　一、选择题（1）D、（2）C、（3）B、（4）A、（5）C （6）D、（7）C、（8）D、（9）B、（10）A

　　　（11）D、（12）C、（13）D、（14）C、（15）D  （16）B、（17）D、（18）A、（19）B、（20）D

　　　（21）D、（22）B、（23）A、（24）A、（25）C   （26）A、（27）A、（28）C、（29）D、（30）B

　　　（31）B、（32）C、（33）B、（34）C、（35）D

　　二、填空题

　　【1】线性结构   【2】n   【3】结构化   【4】数据库管理系统

　　　【5】关系【6】1

　　【7】   【8】数据访问页【9】Forml.Caption="Access窗体"【10】m<=100 或者m<101

　　【11】-f 或者 f*(-1)      【12】Second+1     【13】False

　　【14】pszy*0.5+xcy*0.1+qzks*0.4

　　【15】Update

 

 

首页 上页 1 2 3 下页 尾页 2/9/9