在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好了表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按以下要求补充“fEdit”窗体的设计。 (1)将窗体中名称为“Lre

admin2015-07-10  24

问题 在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好了表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按以下要求补充“fEdit”窗体的设计。
    (1)将窗体中名称为“Lremark”的标签控件上的文字颜色改为“蓝色”(蓝色代码为#0072BC)、字体粗细改为“加粗”。
    (2)将窗体标题设置为“显示/修改用户口令”。
    (3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线;保留窗体的关闭按钮。
    (4)将窗体中“退出”命令按钮(名称为“cmdquit”)上的文字颜色改为棕色(棕色代码为128)、字体粗细改为“加粗”,并在文字下方加下划线。
    (5)在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”。其中“保存”命令按钮在初始状态为不可用,当单击“修改”按钮后,“保存”按钮变为可用,同时在窗体的左侧显示出相应的信息和可修改的信息。如果在“口令”文本框中输入的内容与在“确认口令”文本框中输入的内容不相符,当单击“保存”按钮后,屏幕上应弹出如图2.3所示的提示框。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。

要求:修改后运行该窗体,并查看修改结果。
注意:不要修改窗体对象“fEdit”和“fEuser”中未涉及的控件、属性;不要修改表对象“tAddr”和“tUser”。
    程序代码只能在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句,完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案(1)【操作步骤】 步骤1:选择“窗体”对象,右键单击“fEdit”,从弹出的快捷菜单中选择“设计视图”命令。 步骤2:右键单击窗体任一点,从弹出的快捷菜单中选择 “属性”命令,打开属性表,在“所选内容的类型:标签”右侧下拉列表中选择“Lremark”,在“格式”选项卡的“前景色”行输入“#0072BC”(蓝色),在“字体粗细”行下拉列表中选择“加粗”,如图3.261所示。关闭属性表。 [*] (2)【操作步骤】 步骤1:右键单击“窗体选择器”,从弹出的快捷菜单中选择“属性”命令。 步骤2:在“格式”选项卡的“标题”行输入“显示/修改用户口令”,如图3.262所示。 [*] (3)【操作步骤】 步骤1:在“边框样式”行下拉列表中选择“细边框”。 步骤2:分别选择“滚动条”、“记录选择器”、“导航按钮”和“分隔线”行下拉列表中的“两者均无”或“否”。 步骤3:在“关闭按钮”行下拉列表中选择“是”,关闭属性表。如图3.263所示。 [*] (4)【操作步骤】 步骤1:右键单击命令按钮“退出”,从弹出的快捷菜单中选择“属性”命令。 步骤2:在“格式”选项卡的“前景色”行输入“128”(软件自动显示为16进制#800000),分别在“字体粗细”和“下划线”行下拉列表中选择“加粗”和“是”,如图3.264所示,关闭属性表。 [*] (5)【操作步骤】 步骤1:在设计视图中右键单击命令按钮“修改”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的“选择生成器”对话框中选择“代码生成器”,进入编程环境,在空行内输入以下代码: *******Add******* MsgBox“请重新输入口令!”,vbOKquit ******* Add******* 如图3.265所示。 [*] 步骤2:关闭界面,按Ctrl+s保存修改,关闭设计视图。

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

最新回复(0)