首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
数据库的“职工基本情况表”有“姓名”和“职称”等字段,要分别统计教授、副教授和其他人员的数量。请在空白处填入适当语句,使程序可以完成指定的功能。 Private Sub command5_Click( ) Dim db As DAO.Dat
数据库的“职工基本情况表”有“姓名”和“职称”等字段,要分别统计教授、副教授和其他人员的数量。请在空白处填入适当语句,使程序可以完成指定的功能。 Private Sub command5_Click( ) Dim db As DAO.Dat
admin
2010-11-01
63
问题
数据库的“职工基本情况表”有“姓名”和“职称”等字段,要分别统计教授、副教授和其他人员的数量。请在空白处填入适当语句,使程序可以完成指定的功能。
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
选项
答案
rs.EOF rs.MoveNext i
解析
本题考查通过DAO数据集的方式访问数据的方法,本题中逐条读取数据集rs(即职工基本情况表)中的记录,依次去依据职称判断归类并统计。所以,逐条读取记录的。Do While语句终止的条件是已处理到数据集的结尾。第二个空处为读取完一条记录后,读取数据集的下一条记录,应使用MoveNext方法。
转载请注明原文地址:https://kaotiyun.com/show/k6up777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
一个C++程序由函数A(),B(),C()和函数P()构成,在函数A()中分别调用了函数B()和函数C(),在函数B()中调用了函数A(),且在函数P()中也调用了函数A(),则可以说()。
下列程序用来判断数组中特定元素的位置所在,则输出结果为()。#include#includeintfun(int*p,intn,int*j){inti:*j=0:for(i=0;i
有如下程序:#includeusingnamespacestd;classVAC{public:intf()const{return3;}intf(){return5;}
在声明派生类时,如果不显示地给出继承方式,缺省的类继承方式是私有继承private。已知有如下类定义:classTestClass{protected:voidfun(){}};classT
在C++语言中函数返回值的类型是由()决定的。
以下关键字不能用来声明类的访问权限的是()。
若x和y是程序中的两个整型变量,则下列if语句中正确的是
下列选项中,正确的C++表达式是
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
随机试题
下列有关急性胰腺炎的各项检查中,最早出现异常的是
由药师或大专以上药学学历的技术人员担任并要保持相对稳定的是应定期清洗、清理、必要时消毒或灭菌的是
[2010年,第106题]因特网是一个联接了无数个小网而形成的大网,也就是说()。
旅游纠纷按其性质可以划分为()。
国家教育行政部门有权制定()
师范学校的出现,与教师成为一种独立的社会职业,从时间上来说()
下列店堂告示中,没有违反《中华人民共和国消费者权益保护法》规定的是()。
兰州市人民政府行文给甘肃省人民政府并报国务院的行文方式属于()。
设随机变量X和Y均服从B(1,),且D(X+Y)=1,则X与Y的相关系数ρ=_________。
ThepassageindicatesthatWhatkindofanimalhasagreaterabilitytoregeneratealostpart?
最新回复
(
0
)