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

admin2013-11-29  25

问题 在考生文件夹下有一个数据库文件"samp3.mdb",里面已经设计好表对象"tAddr"和"tUser",同时还设计出窗体对象"fEdit"和"fEuser"。请在此基础上按照以下要求补充"fEdit"窗体的设计:
(1)将窗体中名称为"lRemark"的标签控件上的文字颜色改为"棕色"(棕代码为128)、字体粗细改为"加粗"。
(2)将窗体标题设为"显示/修改用户口令"。
(3)将窗体边框改为"对话框边框"样式,取消窗体中的水平和垂直滚动条、记录选择器、浏览按钮、分隔线和控制框。
(4)将窗体中"退出"命令按钮(名称为"cmdquit"上的文字颜色改为蓝色(蓝色代码为16711680)、字体粗细改为"加粗",并在文字下方加上下划线。
(5)在窗体中还有"修改"和"保存"两个命令按钮,名称分别为"CmdEdit"和"CmdSave",其中"保存"命令按钮在初始状态为不可用,当单击"修改按钮后,"保存"按钮变为可用。现已编写了部分VBA代码,请按照上述要求将VBA代码补充完整。
要求:修改后运行该窗体,并查看修改结果。
注意:不要修改窗体对象"fEdit"和"fEuser"中未涉及的控件、属性;不要修改表对象"tAddr"和"tUser"。
程序代码只能在"*****Add*****"与"*****Add*****"之间的空行内补充一行语句,完成设计,不允许增删和修改其它位置已存在的语句。

选项

答案(1)【操作步骤】 步骤1:选中"窗体"对象,右键单击"fEdit"选择【设计视图】。 步骤2:右键单击标签控件"lRemark"选择【属性】,在"格式"选项卡的"前景色"行输入"128",在"字体粗细"行右侧下拉列表中选中"加粗",关闭属性界面。 (2)【操作步骤】 步骤1:右键单击"窗体选择器"选择【属性】。 步骤2:在"格式"选项卡的"标题"行输入"显示/修改用户口令"。 (3)【操作步骤】 步骤1:在"边框样式"行右侧下拉列表中选中"细边框"。 步骤2:分别选中"滚动条"、"记录选择器"、"导航按钮"和"分隔线"右侧下拉列表中的"否"。 步骤3:在"关闭"按钮行右侧下拉列表中选中"是",关闭属性界面。 (4)【操作步骤】 步骤1:右键单击命令按钮"退出"选择【属性】。 步骤2:在"格式"选项卡的"前景色"行输入"16711680",分别在"字体粗细"和"下划线"行右侧下拉列表中选中"加粗"和"是",关闭属性界面。 (5)【操作步骤】 步骤1:右键单击命令按钮"修改"选择【事件生成器】,在空格行输入: **********Add************’ MsgBox "请重新输入口令!", vbOKquit **********Add************’ 关闭界面。 步骤2:单击工具栏中"保存"按钮[*],关闭设计视图。

解析 第1、2、3、4小题右键单击控件选择【属性】,设置属性;第5小题右键单击控件选择【事件生成器】,输入代码。
转载请注明原文地址:https://kaotiyun.com/show/zgrp777K
0

最新回复(0)