首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。 (1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
admin
2017-02-16
42
问题
考生文件夹下存在一个数据库文件“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”的语句是______。
要使单击命令按钮与按下<Esc>键实现相同的作用,则应设置()属性为True。
窗体上有一个名称为Commandl的命令按钮,其事件过程如下:PrivateSubCommandlClick()DimSAsString()pen"C:\Filel.txt"ForInputAs#1()pe
以下语句可以实现将文件filename1复制为filename2的是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsIntegerDimsumAsIntegerDimsu
在下面向文件中写入数据的命令语句中,不正确的是______。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度:1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTyPeAngKAsIntegerSinxAsSin
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是_________。
由Array函数建立的数组的名字必须是【】类型。
在窗体上画两个单选按钮,名称分别为Opfion1,Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”:一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被
随机试题
A.大炮音B.胸骨左缘第3~4肋间舒张期叹气样杂音C.Graham-Steel杂音D.胸骨左缘第2~3肋间收缩期喷射性杂音E.胸骨右缘第2肋间收缩期杂音并向颈部传导主动脉瓣狭窄
根据相关关系的程度划分,相关关系可分为()
下列组合错误的是
符合颌面部闭合性损伤特点的是
依据《中华人民共和国节约能源法》,关于节能政策,下列说法中,错误的是()。
遗忘:记忆
2002年的在校生中,工学学生所占的比例约是:如果数据中的在校生不包括毕业生,那么2002年高校共约招了:
国家性质是国家制度的()
自动编号数据类型一旦被指定,就会永久地与______连接。
______rocketshadbeenusedsporadicallyforseveralhundredyears,theyremainedarelativelyminorartifactofcivilizationu
最新回复
(
0
)