试题13数据库中有“平时成绩表”，包括“学号”“姓名”“平时作业”“小测验”“期中考试”“平时成绩”和“能否考试”等字段，其中，平时成绩=平时作业*50%+小测验*10%+期中成绩*40%，如果学生平时成绩大于等于60分，则可以参加期末考试（“能否考试”字段为真），否则学生不能参加期末考试。下面的程序按照上述要求计算每名学生的平时成绩并确定是否能够参加期末考试。请在空白处填入实弹的语句，使程序可以完成所需要的功能。Private Sub Command0_Click()Dim db As SingleDi

有如下SQL语句： SELECT姓名FROM学生表WHERE学号IN； (SELECT学号FROM成绩表WHERE成绩＞90) 下列哪条命令与该SQL语句等价

A．SELECT姓名FROM学生表WHERE EXISTS； (SELECT学号FROM成绩表WHERE成绩＞90)

B．SELECT姓名FROM学生表WHERE EXISTS； (SELECT学号FROM成绩表WHERE学号=学生表．学号AND成绩＞90)

C．SELECT姓名FROM学生表WHERE学号EXISTS； (SELECT学号FROM成绩表WHERE学号=学生表．学号AND成绩＞90)

D． SELECT姓名FROM学生表WHERE学号=； (SELECT学号FROM成绩表WHERE成绩＞90)

学校的数据库中有表示系和学生的关系：系(系编号，系名称，系主任，电话，地址)，学生(学号，姓名，性别，入学日期，专业，系编号)，则关系学生中的主键和外键分别是()。

A.学号，系编号

B.学号，专业

C.学号，姓名

D.学号，无外键

（13）数据库中有“学生成绩表”，包括“姓名”、“平时成绩”、“考试成绩”和“期末总评”等字段。现要根据“平时成绩”和“考试成绩”对学生进行“期末总评”。规定：

“平时成绩”加“考试成绩”大于等于85分，则期末总评为“优”，“平时成绩”加“考试成绩”小于60分，则期末总评为“不及格”，其他情况期末总评为“合格”。

下面的程序按照上述要求计算每名学生的期末总评。请在空白处填入适当的语句，使程序可以完成指定的功能。

Private Sub Command0_Click()

Dim db As DAO.Database

Dim rs As DAO.Recordset

Dim pscj,kscj,qmzp As DAO.Field

Dim count As Integer

Set db=CurrentDb()

Set rs=db.OpenRecordset("学生成绩表")

Set pscj=rs.Fields("平时成绩")

Set kscj=rs.Fields("考试成绩")

Set qmzp=rs.Fields("期末总评")

count=0

Do While Not rs.EOF

【14】

If pscj+kscj>=85 Then

qmzp="优"

ElseIf pscj+kscj<60 Then

qmzp="不及格"

Else

qmzp="合格"

End If

rs.Update

count=count+1

【15】

Loop

rs.Close

db.Close

Set rs=Nothing

Set db=Nothing

MsgBox "学生人数："&count

End Sub

数据库中有“平时成绩表”，包括“学号”、“姓名”、“平时作业”、“小测验”、“期中考试”、“平时成绩”和“能否考试”等字段，其中，平时成绩=平时作业×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

mdb”数据库中有教师、课程、授课、课程成绩和学生表。

(1)以学生、课程和课程成绩表为数据源，创建查询生成表“查询1”，生成成绩表。生成学生姓名、课程名称和成绩字段。成绩表结果如图所示。

(2)以教师、课程、授课和课程成绩表为数据源，创建查询“查询2”，统计具有博士学历的教师所教学生数。结果显示教师姓名、学历和学号之Count字段。查询结果如图所示。

某学校的教学信息关系数据库中有如下两个表：

学生表（学号，姓名，性别，专业）

成绩表（学号，课程名，分数）

用SQL语句表达下述查询：

（a）检索分数高于80分的所有学生的学号和分数。

（b）检索选修了“高等数学”课程的所有学生的学号。