数据库的“职工基本情况表”有“姓名”和“职称”等字段,要分别统计教授、副教授和其他人员的数量。请在空白处填入适当语句,使程序可以完成指定的功能。Private Sub command5_Click( )Dim db As DAO.DatabaseDim rs As DAO.RecordsetDim zc As DAO.FieldDim Count 1 As Integer,Count2 As Integer,Count3 As IntegerSett db=CurrentDb( )Set rs=db.OpenRecordset(“职工基本情况表”)Set zc=rs.Fields(“职称”)Count1=0:Count2=0:Count3=0Do While Not______Select Case zcCase Is=“教授”Count1=Count1+1Case Is=“副教授”Count2=Count2+1Case ElseCount3=Count3+1End Select______Looprs.Closese rs=NothingSet db=NothingMsgBox“教授:”Count 1“,副教授:”Count2“,其他:”Count 3End Sub

数据库的“职工基本情况表”有“姓名”和“职称”等字段,要分别统计教授、副教授和其他人员的数量。请在空白处填入适当语句,使程序可以完成指定的功能。

Private Sub command5_Click( )

Dim db As DAO.Database

Dim rs As DAO.Recordset

Dim zc As DAO.Field

Dim Count 1 As Integer,Count2 As Integer,Count3 As Integer

Sett db=CurrentDb( )

Set rs=db.OpenRecordset(“职工基本情况表”)

Set zc=rs.Fields(“职称”)

Count1=0:Count2=0:Count3=0

Do While Not______

Select Case zc

Case Is=“教授”

Count1=Count1+1

Case Is=“副教授”

Count2=Count2+1

Case Else

Count3=Count3+1

End Select

______

Loop

rs.Close

se rs=Nothing

Set db=Nothing

MsgBox“教授:”&Count 1&“,副教授:”&Count2&“,其他:”&Count 3

End Sub


相关考题:

( 13 ) 数据库中有工资表 , 包括 “ 姓名 ” 、 “ 工资 ” 和 “ 职称 ” 等字段 , 现要对不同职称的职工增加工资 , 规定教授职称增加 15% , 副教授职称增加 10% , 其他人员增加 5% 。下列程序的功能是按照上述规定调整每位职工的工资 , 并显示所涨工资之总和 。 请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub Command5_Click()Dim ws As DAO.WorkspaceDim db As DAO.DatabaseDim rs As DAO.RecordsetDim gz As DAO.FieldDim zc As DAO.FieldDim sum As Currenc yDim rate As SingleSet db = CurrentDb()Set rs = db.OpenRecordset( " 工资表 " )Set gz = rs.Fields( " 工资 " )Set zc = rs.Fields( " 职称 " )sum = 0Do While Not 【 14 】rs.EditSelect Case zcCase Is = " 教授 "rate = 0.15Case Is = " 副教授 "rate = 0.1Case Elserate = 0.05End Selectsum = sum + gz * rategz = gz + gz * rate【 15 】rs.MoveNextLooprs.Closedb.CloseSet rs = NothingSet db = NothingMsgBox " 涨工资总计 : " sumEnd Sub

设教师表的结构为:(教师号、姓名、性别、职称、工资、所在系),其中教师号为主键。若要利用SELECT-SQL语句查询除教授和副教授以外的教师姓名,其WHERE子句为______。A.WHERE职称NOTBETWEEN“教授”AND“副教授”B.WHERE职称!=“教授”AND“副教授”C.WHERE职称NOTLIKE(“教授”,“副教授”)D.WHERE职称NOTIN(“教授”,“副教授”)

显示表中所有教授和副教授记录的命令是() A、listfor职称=“教授”and职称=“副教授”B、listfor职称=“副教授”C、listfor职称=“教授”or“副教授”D、listfor“教授”$职称

在“员工信息管理”数据库中建立视图myview,显示字段包括“职工编号”,“姓名”和“职称编号”和“职称名称”等字段内容是职称名称为“副教授”的记录。(2)建立表单myfm,标题为“视图查看”。在表单上显示上题中建立的视图myview的内容。表单上有一个标题为“关闭”的命令按钮,单击该按钮,退出表单。

在命令窗口中,显示当前数据库中所有40岁(含40岁)以下、职称为“教授”或“副教授”的人员姓名和工资,应使用命令______。A.LIST姓名,工资FOR年龄<=40.AND(职称=“教授”.AND)职称=“副教授”B.LIST姓名,工资FOR年龄<=40.OR.职称=“教授”.OR.职称=“副教授”C.LIST姓名,工资FOR年龄<=40.AND(职称=“教授”.OR.职称=“副教授”)D.LIST姓名,工资FOR年龄<=40.OR.(职称=“教授”.AND)职称=“副教授”

对数据库中职称为教授和副教授的记录的工资总额进行统计,并将其统计结果赋给变量CZ,可以使用的命令有( )。A.SUM工资to CZ FOR职称=“教授”.AND.“副教授”B.SUM工资to CZ FOR职称= “教授”.OR.“副教授”C.SUM工资to CZ FOR职称=“教授”.AND.职称=“副教授”D.SUM工资to GZ FOR职称=“教授”.OR.职称=“副教授”

在命令窗口中,显示当前数据库中所有40岁(含40岁)以下、职称为“教授”、“副教授”的姓名和工资,应使用命令A.LIST姓名,工资FOR年龄<=40.AND(职称=“教授”.AND) 职称=“副教授”B.LIST姓名,工资FOR年龄<=40.OR.职称=“教授”.OR.职称=“副教授”C.LIST姓名,工资FOR年龄<=40.AND(职称=“教授”.OR.职称=“副教授”)D.LIST姓名,工资FOR年龄<=40.OR.(职称=“教授”.AND) 职称=“副教授”

如果要计算职称为副教授以上(含副教授、教授)职工的工资总额,在下列命令中,错误的是( )。A.SUM 工资 FOR 职称=’副教授’ OR 职称=’教授’B.SUM ALL 工资 FOR 职称=’副教授’ OR 职称=’教授’C.SUM 工资 FOR ’教授’ $ 职称D.SUM 工资 FOR 职称=’副教授’AND 职称=’教授

设教师表的结构为:(教师号、姓名、性别、职称、工资、所在系),其中教师号为主键。若要利用SELECT语句查询除教授和副教授以外的教师姓名,其WHERE子句为______。A.WHERE职称NOT BETWEEN"教授"AND"副教授"B.WHERE职称!="教授"AND"副教授"C.WHERE职称NOT LIKE("教授","副教授")D.WHERE职称NOT IN("教授","副教授")