在考生文件夹下有一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud",同时还设计出窗体对象"fStud"。请在此基础上按照以下要求补充"fStud"窗体的设计: (1)在窗体的"窗体页眉"中距左边0.4厘米、距上边1.2厘米处添加一个直

admin2013-11-29  29

问题 在考生文件夹下有一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud",同时还设计出窗体对象"fStud"。请在此基础上按照以下要求补充"fStud"窗体的设计:
(1)在窗体的"窗体页眉"中距左边0.4厘米、距上边1.2厘米处添加一个直线控件,控件宽度为10.5厘米,控件命名为"tLine";
(2)将窗体中名称为"lTalbel"的标签控件上的文字颜色改为"蓝色"(蓝色代码为16711680)、字体名称改为"华文行楷"、字体大小改为22;
(3)将窗体边框改为"细边框"样式,取消窗体中的水平和垂直滚动条、记录选定器、浏览按钮和分隔线;只保留窗体的关闭按钮;
(4)假设"tStud"表中,"学号"字段的第5位和6位编码代表该生的专业信息,当这两位编码为"10"时表示"信息"专业,为其他值时表示"管理"专业。设置窗体中名称为"tSub"的文本框控件的相应属性,使其根据"学号"字段的第5位的第6位编码显示对应的专业名称;
(5)在窗体中有一个"退出"命令按钮,名称为"CmdQuit",其功能为关闭"fStud"窗体。请按照VBA代码中的指示将实现此功能的代码填入指定的位置中。
注意:不要修改窗体对象"fStud"中未涉及的控件、属性和任何VBA代码;不允许修改表对象"tStud"。
程序代码只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存

选项

答案(1)【操作步骤】 步骤1:选中"窗体"对象,右键单击"fStud"选择【设计视图】。 步骤2:选中工具箱中"直线"控件,单击窗体页眉处。 步骤3:右键单击"直线"控件选择【属性】,在"名称"行输入"bTitle",分别在"左边距","上边距"和"宽度"行输入"0.4cm","1.2 cm"和"10.5cm"。关闭属性界面。 (2)【操作步骤】 步骤1:右键单击标签控件"lTalbel"选择【属性】,在"前景色"行输入"16711680"。 步骤2:分别在"字体"和"字号"行右侧下拉列表中选中"华文行楷"和"22"。关闭属性界面。 (3)【操作步骤】 步骤1:右键单击"窗体选择器"选择【属性】。 步骤2:分别在"边框样式","滚动条","记录选择器","导航按钮","分隔线","关闭按钮"行右侧下拉列表中选中"细边框"、"否"、"否"、"否"、"否"、"是",关闭属性界面。 (4)【操作步骤】 步骤1:右键单击文本框"tSub"选择【属性】。 步骤2:在"控件来源"行输入"=IIf(Mid([tNum],5,2)="10","信息","管理")",保存并关闭属性界面。 (5)【操作步骤】 步骤1:右键单击"退出"选择【事件生成器】,在空行内输入代码: ’*****Add***** DoCmd.Close ’*****Add***** 关闭界面。 步骤2:单击工具栏中"保存"按钮[*],关闭设计视图。

解析 第1小题在窗体设计视图添加控件,并右键单击控件选择【属性】,设置属性;第2、3、4小题右键单击控件选择【属性】,设置属性;第5小题右键单击控件选择【事件生成器】,输入代码。
转载请注明原文地址:https://jikaoti.com/ti/hVV0FFFM
0

最新回复(0)