问题 问答题

在考生文件夹下存在一个数据库文件samp3.mdb,里面已经设计好窗体对象fSys。请在此基础上按照以下要求补充fSyrs窗体的设计。

按照以下窗体功能,补充事件代码设计:在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为tUser和tPass,还有“确定”和“退出”两个命令按钮,名称分别为cmdEnter和cmdQuit。在tUser和tPass两个文本框中输入用户名称和用户密码后,单击“确定”按钮,程序将判断输入的值是否正确,如果输入的用户名称为cueb,用户密码为“1234”,则显示提示框,提示框标题为“欢迎”,显示内容为“密码输入正确,欢迎进入系统!”,提示框中只有一个“确定”按钮,当单击“确定”按钮后,关闭该窗体;如果输入不正确,则提示框显示内容为“密码错误!”,同时清除tuser和tPass两个文本框中的内容,并将光标置于luser文本框中。当单击窗体上的“退出”按钮后,关闭当前窗体。
[注意] 不允许修改窗体对象fSys中未涉及的控什、属性和任何VBA代码。只允许在两行“** * * * Add * * * * *”之间的空行内补充一条语句,不允许增删和修改其他位置已存在的语句。

答案

参考答案:

单击cmdEnter(“确定”按钮),打开属性对话框,然后单击“事件”标签,光标定位在“单击”属性行“[事件过程]”中,单击右侧的

按钮,如图4-14所示,打开VBA代码窗口。在第一个添加语句的位置填入语句“If name="cueb"And pass="1234"Then”(对用户名和密码进行判定);在第二个添加语句的位置填入语句“Me ! tUser.SetFocus”(将光标置于文本框tUset中);在第三个添加语句的位置填入语句“Docmd.Close”(关闭窗口),如图4-15所示。保存程序代码,关闭代码窗口。保存窗体的设置后,切换到窗体视图,验证结果是否正确。

完成上述5题的操作后关闭数据库文件samp3.mdb。

解析:

本题考核的是窗体的设计。包括窗体属性的设置、标签控件和文本框控件属性的设置以及VBA代码设计。

选择题
单项选择题 A1/A2型题