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

admin2015-08-20  27

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

选项

答案(1)步骤1:打开“samp3.accdb”数据库,在【开始】功能区的“窗体”面板中右击“fStud”窗体,选择“设计视图”快捷菜单命令,打开“fSmd”的设计视图。 步骤2:单击【控件】分组中的“直线”按钮,在窗体页眉适当位置画一条直线,右键单击该直线,选择“属性”快捷菜单命令,在【属性表】对话框中,设置“左”为:0.4cm,“上边距”为:1.2cm,“宽度”为:10.5cm,“名称”为:tLine。 步骤3:单击快速访问工具栏中的“保存”按钮。 (2)步骤1:选中窗体中的“1Talbel”标签,在【属性表】对话框中,设置“前景色”为:16711680,设置“字体名称”为:华文行楷,“字号”为:22。 步骤2:单击快速访问工具栏中的“保存”按钮。 (3)步骤1:右键单击窗体空白处,选择“表单属性”快捷菜单命令,在【属性表】对话框的“边框样式”下拉列表中选择:细边框,设置“滚动条”为:两者均无,将“记录选择器”、“导航按钮”和“分隔线”为:否,将“最大最小化按钮”设置为:无,将“关闭按钮”设置为:是。 步骤2:单击快速访问工具栏中的“保存”按钮。 (4)步骤1:在【属性表】对话框左上角的下拉框中选择“tsub”,在“控件来源”中输入:=IIf(Mid([学号],5,2):“10”,“信息”,“管理”)。 步骤2:单击快速访问工具栏中的“保存”按钮。 (5)步骤1:单击【窗体设计工具-设计】功能区的【工具】分组中的“查看代码”按钮,打开“代码设计器”窗口。 在“****Add****”行之间输入代码: DoCmd.Close 步骤2:关闭代码窗口。单击快速访问工具栏中的“保存”按钮,关闭设计视图。

解析
转载请注明原文地址:https://kaotiyun.com/show/WXgp777K
0

最新回复(0)