首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
admin
2017-02-16
35
问题
考生文件夹下存在一个数据库文件“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://jikaoti.com/ti/N8y0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。PrivateSubForm_Click()DimiAsIntegerOpen【】As#1Fori=1To10
下列有关子菜单的说法中,错误的是()
下列程序段的运行结果是:PrivateSubCommand1_Click()DimnASIntegerI=21:n=3dowhileI>nI=I-nLoopPrintIEn
设在工程中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
下列叙述中错误的是()。
在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中______的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Tex
声明一个变量为局部变量应该用()。
以下叙述中错误的是______。
软件工程中,软件配置由配置项来表示,以下选项中,______不属于软件配置项的内容。
随机试题
在政治社会化过程中,最系统化和规范化的影响因素是()
师说韩愈古之学者必有师。师者,所以传道受业解惑也。人非生而知之者,孰能无惑?惑而不从师,其为惑也,终不解矣。生乎吾前,其闻道也固先乎吾,吾从而师之;生乎吾后,其闻道也亦先乎吾,吾从而师之。吾师道也,夫庸知其年之先后生于吾乎?是故
梁板式肋形楼板中,其主梁梁高应为跨度(),梁宽为梁高的()。
上市公司出现()情形可以向证券交易所申请退市。Ⅰ.上市股东大会决议主动撤回其股票在证券交易所的交易,并决定不再在该交易所交易Ⅱ.上市公司被其他公司实施控股合并Ⅲ.上市公司股东大会决议公司解散Ⅳ.他人向所有股东发出收购或收购全部或者部分股份要
自动化控制系统的组成部分有()。
阅读下列资料,回答问题。下列表述中,错误的是:
如果儿童能够认识到不同的个体在知觉信息完全相同的情况下,通过各自不同的建构、解释而对情境持有不同的信念,那么说明儿童
犯罪分子为日后向甲勒索财物,用枪威逼甲杀死一名路人并录像。甲的杀人行为属于()(2018年一专一第2题)
根据题意设X1,X2,…,Xn是一个简单随机样本,因此X1,X2,…,Xn相互独立,且与总体同分布,从而可知[*]
有以下程序:#include<stdio.h>voidfun(intn,int*s){intf1,t2;if(n==1||n==2)*s=1;else
最新回复
(
0
)