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

admin2013-10-22  25

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

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

选项

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

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

最新回复(0)