首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
admin
2017-02-16
50
问题
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。
(1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm处添加一个直线控件,控件宽度为10.5cm,控件命名为“tLine”;将窗体中标签控件“1Talbel”上的文字改为“隶书”,字号改为18。
(2)打开窗体时,窗体标题自动显示为标签控件“1Talbel”的内容,并且自动将该控件上的文字颜色改为“蓝色”,请按照VBA代码中的指示将代码补充完整。
(3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线;并且只保留窗体的关闭按钮。
(4)假设“tStud”表中“学号”字段的第5位和第6位编码代表该生的专业信息,当这两位编码为“10”时表示“信息”专业,为其他值时表示“管理”专业。设置窗体中名称为“tSub”文本框控件的相应属性,使其根据“学号”字段的第5位和第6位编码显示对应的专业名称。
(5)在窗体中有一个“退出”命令按钮,名称为“CmdQuit”,其功能为关闭“tStud”窗体。请按照VBA代码中的指示将实现此功能的代码补充完整。
注意:不允许修改窗体对象“fStud”中未涉及的控件、属性和任何VBA代码;不允许修改表对象“tStud”:程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句完成设计,不允许增删和修改其它位置已存在的语句。
选项
答案
(1)【操作步骤】 步骤1:选择“窗体”对象,右键单击“tStud”窗体,在弹出的快捷菜单中选择“设计视图”命令,打开“设计视图”。 步骤2:单击“设计”选项卡下“控件”组中的“其他”下拉按钮,选择控件组中的“直线”按钮,然后在窗体页眉节的任意区域中单击。 步骤3:右键单击该“直线”控件,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,在该对话框中单击“全部”选项卡,在该选项卡下的“名称”行中输入“tLine”,在“宽度”行中输入“10.5cm”,在“上边距”行中输入“1.2cm”,在“左”行中输入“0.4cm”,如图4.38所示。 [*] 步骤4:单击“属性表”对话框中“所选内容的类型:”下方的文本框,在弹出的下拉列表中选择“1Talbel”标签,打开“1Talbel”标签的“属性表”对话框。在该对话框中单击“格式”选项卡,在该选项卡的“字体名称”行中选择“隶书”,在“字号”行中输入“18”,如图4.39所示。 [*] 步骤5:关闭“属性表”对话框。单击快速工具栏中的“保存”按钮。 (2)【操作步骤】 步骤1:双击标尺相交处的“窗体选择器”,打开“属性表”对话框,在该对话框中单击“事件”选项卡,然后单击该选项卡下“加载”行的事件生成器按钮,进入VBA代码编辑区。 步骤2:在“′*****Add2*****”区域的空白行中输入“Form.Caption=Me.1Talbel.Caption”,在′*****Add3*****”区域的空白行中输入“1Talbel.ForeColor=RGB(0,0,255)”,如图4.40所示。 [*] 步骤3:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 步骤4:关闭“属性表”对话框,然后单击快速工具栏中的“保存”按钮。 (3)【操作步骤】 步骤1:双击标尺相交处的“窗体选择器”,打开“属性表”对话框,在该对话框中单击“格式”选项卡,在该选项卡下的“边框样式”行中选择“细边框”,在“滚动条”行中选择“两者均无”,在“记录选择器”行中选择“否”,在“导航按钮”行中选择“否”,在“分隔线”行中选择“否”,在“关闭按钮”行中选择“是”,在“最大最小按钮”行中选择“无”,如图4.41所示。 [*] 步骤2:关闭“属性表”对话框。单击快速工具栏中的“保存”按钮。 (4)【操作步骤】 步骤1:右键单击“tSub”文本框控件,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,在该对话框中单击“数据”选项卡,在该选项卡的“控件来源”行中输入“=IIf(Mid([学号],5,2)="10","信息","管理")”,如图4.42所示。 [*] 步骤2:关闭|“属性表”对话框。单击快速工具栏中的“保存”按钮。 (5)【操作步骤】 步骤1:右键单击“CmdQuit”按钮,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,在该对话框中单击“事件”选项卡,然后单击该选项卡下的“单击”行右侧的事件生成器按钮,进入VBA代码编辑区。 步骤2:在“′*****Add1*****”区域的空白行中输入“DoCmd.Close”,如图4.43所示。 [*] 步骤3:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 步骤4:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。
解析
转载请注明原文地址:https://kaotiyun.com/show/U2Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在菜单中,唯一能够识别的事件是【】。
设a="MicrosoftVisualBasic",则以下使变量b的值为“VisualBasic”的语句是______。
为了在运行时把窗体Form1的标题(Caption属性)设置为“TestProgram”,应使用的语句为【】。
有如下函数过程:Functiongys(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley0preminder=x/yx=yy=preminderLoopgys=xE
有如下程序。PrivateSubCommand1_Click()DimaAsSingleDimbAsSinglea=5:b=4CallSub1(a,b)EndSubSubSub1(xAs
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()CommonDialogFlags=cdlOFNHideReadOntyC
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:前序遍历、【】遍历和后序遍历。
面向对象的模型中,最基本的概念是对象和【】。
软件工程的目的是成功地开发大型软件系统,主要内容是软件开发技术和【】两方面。
有下列二叉树,对此二叉树前序遍历的结果是()。
随机试题
()可以设定除限制人身自由以外的行政处罚。
下列关于公司的描述不准确的是( )。
金融业以外汇折算营业额的,应当按照中国人民银行公布的基准汇价将收到的外汇折算成人民币,适用折合率的时间是( )。
下列属于公安行政许可的是()
某检察院对陈某、姚某共同诈骗一案审查起诉时,陈某潜逃。下列哪一选项是正确的?()
在安装RedhatLinux9.0操作系统的过程中,如果没有选择安装Web服务器,Apache服务器则需要手动安装。现从http://httpd.apache.org网站上免费下载了一个apache-2.2.3RPM格式的软件包,请将以下(1)空缺处
在下面关于PC机键盘的叙述中,错误的是
Whatwillthewomando?
Whoistheyoungestofthethree?
A、Thosewhowillworkharderthanothers.B、Thosewhoknowmuchmorethanothers.C、Thosewhoareabletosolveproblems.D、Thos
最新回复
(
0
)