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