学生必须完成（)才可参加课程期末考试。

A.必须、远程学习中心、零分

B.可以、继续教育与远程教育学院、零分

C.必须、远程学习中心、无效

D.可以、继续教育与远程教育学院、无效

参加缓考的学生是否需在下个学期重新完成该课程的网上平时作业，获得平时成绩后，方可在网上预约并参加期末考试。（)

A.是

B.否

学生参加平时作业考核后是否必须预约方可参加期末考试，获得学分？（)

A.是

B.否

A.平时学习状态考核

B.期末论文

C.平时作业考核

D.期末考试

A.60%

B.65%

C.55%

D.50%

试题13

数据库中有“平时成绩表”，包括“学号”“姓名”“平时作业”“小测验”“期中考试”“平时成绩”和“能否考试”等字段，其中，平时成绩=平时作业*50%+小测验*10%+期中成绩*40%，如果学生平时成绩大于等于60分，则可以参加期末考试（“能否考试”字段为真），否则学生不能参加期末考试。

下面的程序按照上述要求计算每名学生的平时成绩并确定是否能够参加期末考试。请在空白处填入实弹的语句，使程序可以完成所需要的功能。

Private Sub Command0_Click()

Dim db As Single

Dim rs As Single

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.Fields(“能否考试”)

Do While Not rs.EOF

rs.Edit

ps=__【14】____

If ps ＞=60 Then

ks=True

Else

Ks=False

End If

rs.___【15】___

rs.MoveNext

Loop

rs.close

db.close

Set rs = Nothing

Set db=Nothing

End Sub

A．0．5*gzks+0．1*xcy+0．4* pszy CLOSE

B．0．5*gzks+0．1*xcy+0．4*pszyUPDATE

C．0．5*pszy+0．1*xcy4+0．4*gzks CLOSE

D．0．5*pszy4+0．1*xcy4+0．4*gzksUPDATE

考试”等字段，其中，平时成绩=平时作业×50%+小测验×10%+期中成绩×40%。如果学生平时成绩大于等于60分，则可以参加期末考试(“能否考试”字段为真)，否则学生不能参加期末考试。 下面的程序按照上述要求计算每名学生的平时成绩并确定是否能够参加期末考试，请在空白处填入适当的语句，使程序可以完成所需要的功能。 PrivateSub Command0_Click（） Dim dbAs DA0．Database Dim rsAs DA0．Recordset Dim pszyAs DA0．Field，xcy As DA0．Field，qzksAs DA0．Field Dim psAs DA0．Field，ks As DA0．FieldSet db=CurrentDb（） Setrs=db．Openrecordset(”平时成绩表”) Setpszy=rs．Fields(”平时作业”) Setxcy=rs．Fields(”小测验”) Setqzks=rs．Fields(”期中考试”) Setps=rs．Fields(”平时成绩”) Setks=rs．Fields(”能否考试”) Do WhileNot rs．EoF rs．Edit ps=__________ Ifps＞=60 Then ks=True Else ks=False End If rs．__________ rs．MoveNext Loop rs．Close db．Close Setrs=Nothing Setdb=Nothing End Sub 横线处应填写的内容是（）。

A.0．5*gzks+0．1*xcy+0．4* pszy CLOSE

B.0．5*gzks+0．1*xcy+0．4*pszyUPDATE

C.0．5*pszy+0．1*xcy4+0．4*gzks CLOSE

D.0．5*pszy4+0．1*xcy4+0．4*gzksUPDATE

A.当堂闭卷

B.当堂开卷

C.在线作业考核

D.小论文考核(线上)