考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好窗体对象"fSys"。请在此基础上按照以下要求补充"fSys"窗体的设计: (1)将窗体的边框样式设置为"对话框边框",取消窗体中的水平和垂直滚动条、记录选择器、导航按钮(导航按钮)、分隔

admin2013-11-29  23

问题 考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好窗体对象"fSys"。请在此基础上按照以下要求补充"fSys"窗体的设计:
(1)将窗体的边框样式设置为"对话框边框",取消窗体中的水平和垂直滚动条、记录选择器、导航按钮(导航按钮)、分隔线、控制框、关闭按钮、最大
化按钮和最小化按钮。
(2)将窗体标题栏显示文本设置为"系统登录"。
(3)将窗体中"用户名称"(名称为"lUser")和"用户密码"(名称为"lPass)两个标签上的文字颜色改为浅综色(浅综色代码为128)、字体粗细
改为"加粗"。
(4)将窗体中名称为"tPass"的文本框控件的内容以密码形式显示。
(5)按照以下窗体功能,补充事件代码设计。
在窗体中有"用户名称"和"用户密码"两个文本框,名称分别为"tUser"和"tPass",还有"确定"和"退出"两个命令按钮,名称分别为"
cmdEnter"和"cmdQuit"。在"tUser"和"tPass"两个文本框中输入用户名称和用户密码后,单击"确定"按钮,程序将判断输入的值是否正确,
如果输入的用户名称为"cueb",用户密码为"1234",则显示提示框,提示框标题为"欢迎",显示内容为"密码输入正确,欢迎进入系统!",
提示框中只有一个"确定"按钮,当单击"确定"按钮后,关闭该窗体;如果输入不正确,则提示框显示内容为"密码错误!",同时清除"tUser
"和"tPass"两个文本框中的内容,并将光标置于"tUser"文本框中。当单击窗体上的"退出"按钮后,关闭当前窗体。
注意:不允许修改窗体对象"fSys"中未涉及的控件、属性和任何VBA代码。只允许在"*****Add*****"与"*****Add*****"之间的空行内补充
一条语句,不允许增删和修改其它位置已存在的语句。

选项

答案(1)【操作步骤】 步骤1:选择"窗体"对象,右击fSys,在弹出的快捷菜单中选择"设计视图"命令,右键单击【窗体选择器】选择【属性】,单击"格式"选项卡,在"边框样式"行下拉列表中选中"对话框边框"。 步骤2: 在"滚动条"行下拉列表中选中"两者均无"。 步骤3: 分别在"记录选择器","导航按钮"、"控制框"、"分隔线"和关闭按钮行下拉列表中选中"否";在"最大最小化按钮"行下拉列表中选中"无";关闭属性界面。 (2)【操作步骤】 步骤1:右键单击【窗体】|【属性】,单击"全部"选项卡。 步骤2:在"标题"行输入"系统登录"。关闭属性界面。 (3)【操作步骤】 步骤1:右键单击【用户名称】|【属性】,在"前景色"行输入"128"。 步骤2:在"字体粗细"行列表中选中"加粗",关闭属性界面。同样的方法设置另一个。 (4)【操作步骤】 步骤1:选中"窗体"对象,右键单击【fSys】|【设计视图】。 步骤2:右键单击标签控件【tPass】|【属性】,在"数据"选项卡的"输入掩码"行单击 ,在"输入掩码向导"中选择"密码",单击【完成】,关闭属性界面。 (5)【操作步骤】 步骤1:选中"窗体"对象,右键单击【fSys】|【设计视图】。 步骤2:右键单击命令按钮【CmdEnter】|【事件生成器】。输入代码: ********************** Add1 ******************** If name = "cueb" And pass = "1234" Then ********************* Add1 ********************* ********************** Add2 ******************** Me!tUser.SetFocus ********************** Add2 ****************** ********************** Add3 ******************* DoCmd.Close ********************** Add3 ******************* 关闭界面。

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

最新回复(0)