首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按照以下要求补充“fSys”窗体和“rStud”报表的设计: 试根据以下窗体功能和报表输出要求,补充
在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按照以下要求补充“fSys”窗体和“rStud”报表的设计: 试根据以下窗体功能和报表输出要求,补充
admin
2017-07-04
38
问题
在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按照以下要求补充“fSys”窗体和“rStud”报表的设计:
试根据以下窗体功能和报表输出要求,补充已给事件代码,并运行调试。在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为“tUser”和“tPass”,还有“确定”和“退出”两个命令按钮,名称分别为“cmdEnter”和“cmdQuit”。窗体加载时,重置“bTitle”标签的标题为“非团员人数为XX”,这里XX为从表查询计算得到;在输入用户名称和用户密码后,单击“确定”按钮,程序将判断输入的值是否正确,如果输入的用户名称为“csy”,用户密码为“1129”,则显示提示框,提示框标题为“欢迎”,显示内容为“密码输入正确,打开报表!”,单击“确定”按钮关闭提示框后,打开“rStud”报表,代码设置其数据源输出非团员学生信息;如果输入不正确,则提示框显示“密码错误!”,同时清除“tUser”和“tPass”两个文本框中的内容,并将光标移至“tUser”文本框中。当单击窗体上的“退出”按钮后,关闭当前窗体。
以上涉及计数操作统一要求用“*”进行。
注意:不允许修改报表对象“rStud”中已有的控件和属性;不允许修改表对象“tStud”。不允许修改窗体对象“fSys”中未涉及的控件、属性和任何V。BA代码;只允许在“***Add***”与“***Add***”之间的空行内补充一条代码语句完成设计,不允许增删和修改其它位置已存在的语句。
选项
答案
步骤1:在“fSys”的设计视图中,在<属性表>对话框上方的对象选择器中选中“窗体”,单击“事件”选项卡,在“加载”行内选择“事件过程”,单击“代码生成器”按钮,进入到VBA代码编辑界面。 步骤2:在“****Add1****”之间输入: bTitle.Caption=’’非团员人数为’’&DCount(’’学号’’,’’tstud",’’团员否=yes") 步骤3:在“****Add2****”之间输入: If Me!tUser=’’csy’’And Me!tPass=’’1129’’then 步骤4:在“****Add3****”之间输入: Me!tUser.SetFocus 步骤5:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。单击“窗体设计工具”选项卡中“视图”命令组的“窗体视图”命令运行窗体,按题目要求测试窗体功能。 步骤6:关闭“fsys”窗体。并关闭“samp3.accdb”数据库。
解析
转载请注明原文地址:https://kaotiyun.com/show/YbMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
结构化程序设计的核心和基础是()。
在过程设计时,要想让某个参数是可选的,应该用()语句。
要在报表每一页的底部都输出信息,需要设置()。
Access数据库文件的扩展名是()。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指()。
相对于数据库系统,文件系统的主要缺陷有数据关联差、数据不一致性和()。
在表格式窗体、纵栏式窗体和数据表窗体中,其中显示记录按列分隔,每列的左边显示字段名,右边显示字段内容的窗体是__________。
软件设计模块化的目的是_________程序设计的复杂性。
随机试题
《哀郢》的文体是()
A、前纵韧带B、后纵韧带C、棘上韧带D、黄韧带E、项韧带连接椎弓板的韧带是
小儿断奶季节选择下列哪项更适宜
可能产生阴燃火或发生火灾不及时报警将造成重大损失的场所,不宜选择()。
技术交易买卖双方不可以采用下列()方法进行。
根据《公司法》的规定,上市公司由股东大会以特别决议通过的事项有()。
没有危害行为,违反治安管理行为就不成立。( )
某学校有一批树苗需要栽种在学院路两旁,每隔5米栽一棵。已知每个学生栽4棵树,则有202棵树没有人栽;每个学生栽5棵树,则有348人可以少栽一棵。问学院路共有多少米?
机关对新录用人员在试用期内进行的是()。
Moneyreallycan’tbuyhappiness,accordingtoanewsurveyshowinglawyersandotherwell-paidwhite-collar?workersaremorel
最新回复
(
0
)