在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按以下要求补充“fEdit”窗体的设计。 在窗体中还有“修改”和“保存”两个命

admin2019-01-09  27

问题 在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按以下要求补充“fEdit”窗体的设计。
在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”,其中“保存”命令按钮在初始状态不可用,当单击“修改”按钮后,“保存”按钮变为可用,同时在窗体的左侧显示出相应的信息和可修改的信息。如果在“口令”文本框中输入的内容与在“确认口令”文本框中输入的内容不相符,当单击“保存”按钮后,屏幕上应弹出如图3—1所示的提示框。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。

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

选项

答案【操作步骤】 在设计视图中右键单击命令按钮“修改”,在弹出的快捷菜单中选择“事件生成器”命令,打开代码编辑窗口,在空行内输入代码: ’********Add******** MsgBox"请重新输人口令!",vbOKquit ’********Add******** 在代码编辑窗口中输入代码位置如图4—265所示,关闭界面,按Ctrl+S保存修改,关闭设计视图。 [*] 补充:①双击左侧导航窗口中的窗体“fEdit”,弹出“显示/修改用户口令”窗口界面,如图4—266所示,可以看到“保存”按钮为不可用状态。 [*] ②单击“修改”按钮,可以看到“保存”按钮变为可用状态,并且窗体左侧显示出相应的信息和可修改信息,如图4—267所示。 [*] ③在“口令:”右边的文本框中输入123456,在“确认口令:”右边的文本框中输入111111,单击“保存”按钮,则会弹出提示框,上面显示提示信息“请重新输入口令!”,如图4—268所示,单击确定按钮。 [*] ④如果在“口令:”和“确认口令:”右边的文本框中输入的内容一致,在弹出的对话框中单击“是”按钮,即可保存修改后的用户口令。 ⑤单击“退出”按钮,则当前窗体被关闭。 以上补充内容不写入操作步骤,只是为了演示前面的操作结果。

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

最新回复(0)