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

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

(1)将窗体的边框样式设置为“对话框边框”，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮(导航按钮)、分隔线、控制框、关闭按钮、最大化按钮和最小化按钮。

(2)将窗体标题栏显示文本设置为“系统登录”。

(3)将窗体中“用户名称”(名称为“1User”)和“用户密码”(名称为“Pass”)两个标签上的文字颜色改为浅综色(浅综色代码为128)、字体粗细改为“加粗”。

(4)将窗体中名称为“&ass”的文本框控件的内容以密码形式显示。

(5)按照以下窗体功能，补充事件代码设计。

在窗体中有“用户名称”和“用户密码”两个文本框，名称分别为“tUser”和“tPass”，还有“确定”和“退出”两个命令按钮，名称分别为“cmdEnter”和“cmdQuit”。在“tIJser”和“&ass”两个文本框中输入用户名称和用户密码后，单击“确定”按钮，程序将判断输入的值是否正确，如果输入的用户名称为“cueb”，用户密码为“1234”，则显示提示框，提示框标题为“欢迎”，显示内容为“密码输入正确，欢迎进入系统!”，提示框中只有一个“确定”按钮，当单击“确定”按钮后，关闭该窗体：如果输入不正确，则提示框显示内容为“密码错误！”，同时清除“tUser”和“tPass”两个文本框中的内容，并将光标置于“tUser”文本框中。当单击窗体上的“退出”按钮后，关闭当前窗体。

注意：不允许修改窗体对象“fSys”中未涉及的控件、属性和任何VBA代码。

只允许在“*****Add*****”与“*****Ad*****”之间的空行内补充一条语句，不允许增删和修改其他位置已存在的语句。

正确答案：【操作步骤】 (1)步骤1：打开“samp3．mdb”数据库选中“窗体”对象右键单击窗体“fSys”选择下拉菜单中的“设计视图”命令。 步骤2：右键单击“窗体选择器”选择下拉菜单中的“属性”命令将窗体的“边框样式”设置为“对话框边框”将窗体的“滚动条”设置为“两者均无”将窗体的“记录选择器”、“导航按钮”、“分隔线”、“控制框”均设置为“否”将窗体的“关闭按钮”、“最大最小化按钮”均设置为“无”。关闭窗体“属性”对话框。 步骤3：单击“保存”按钮。 (2)步骤l：右键单击“窗体选择器”选择下拉菜单中的“属性”命令在“属性”对话框中将窗体的标题设置为“系统登录”。 步骤2：关闭属性窗口。 (3)步骤l：选中将窗体中“用户名称”(名称为“lUscr”)和“用户密码”(名称为“Pass”)两个标签右键单击选择下拉菜单中的“属性”命令将窗体的“前景色”设置为“128”“字体粗细”设置为“加粗”。 步骤2：关闭“属性”对话框。 (4)步骤1：右键单击“tPass”文本框选择下拉菜单中的“属性”命令在“数据选项卡”中的“输入掩码”中输入：密码。 步骤2：关闭“属性”对话框。 (5)步骤1：右键单击“确定”按钮选择下拉菜单中的“事件生成器”命令在空行内输入代码： ************Addl**************** If name=“cueb”And pass=“1234”rhen ************Add1**************** ************Add2**************** Me!tUser．SetFocus ************Add2**************** ************Add3**************** DoCmd．Closc ************Add3***************** 步骤2：关闭代码窗口。单击“保存”按钮关闭设计视图。
【操作步骤】 (1)步骤1：打开“samp3．mdb”数据库，选中“窗体”对象，右键单击窗体“fSys”，选择下拉菜单中的“设计视图”命令。 步骤2：右键单击“窗体选择器”，选择下拉菜单中的“属性”命令，将窗体的“边框样式”设置为“对话框边框”，将窗体的“滚动条”设置为“两者均无”，将窗体的“记录选择器”、“导航按钮”、“分隔线”、“控制框”均设置为“否”，将窗体的“关闭按钮”、“最大最小化按钮”均设置为“无”。关闭窗体“属性”对话框。 步骤3：单击“保存”按钮。 (2)步骤l：右键单击“窗体选择器”，选择下拉菜单中的“属性”命令，在“属性”对话框中，将窗体的标题设置为“系统登录”。 步骤2：关闭属性窗口。 (3)步骤l：选中将窗体中“用户名称”(名称为“lUscr”)和“用户密码”(名称为“Pass”)两个标签，右键单击，选择下拉菜单中的“属性”命令，将窗体的“前景色”设置为“128”，“字体粗细”设置为“加粗”。 步骤2：关闭“属性”对话框。 (4)步骤1：右键单击“tPass”文本框，选择下拉菜单中的“属性”命令，在“数据选项卡”中的“输入掩码”中输入：密码。 步骤2：关闭“属性”对话框。 (5)步骤1：右键单击“确定”按钮，选择下拉菜单中的“事件生成器”命令，在空行内输入代码： ************Addl**************** If name=“cueb”And pass=“1234”rhen ************Add1**************** ************Add2**************** Me!tUser．SetFocus ************Add2**************** ************Add3**************** DoCmd．Closc ************Add3***************** 步骤2：关闭代码窗口。单击“保存”按钮，关闭设计视图。 解析：本题考查窗体中控件的设计方法，控件格式的设置方法。在控件中利用系统函数、宏以及模块的实现控件的功能与作用。