实数验九 模块的应用(答案).docVIP

实验九 模块的应用 一、实验目的 1．掌握模块的创建方法 2．模块的应用 二、实验内容 （一）设计一个登录窗体（用户名和密码验证） ---【IF的应用】 【本题知识点】 IF语句的应用 MsgBox函数的应用 简单事件驱动程序的编写 要求如下： 窗体如图S9-1，去掉导航按钮、记录选择器、滚动条和分隔线等；（可以利用实验八的验证密码窗体改造） 标签的文字：用户登录，隶书、22号，红色； 添加如图的控件，其中接收密码的文本框要设置成“密码”型； 使用过程验证用户名和密码正确与否（正确用户名ASDF，密码12345） 如果任何一个输入不对，信息窗标题“验证”，提示“用户名或密码错!”， 单击“重试”按钮时，将用户名和密码清空，焦点放在用户名中：（如图S9-2） 若输入正确，打开实验八所定义的主控面板，并关闭当前窗体（验证）。 图S9-1 图S9-2 【提示：】 1）文本框设置成“密码”型，操作方法： 在“属性”的“数据”中，“输入掩码向导”中选择“密码”如图。 2）小窍门：如果你打开窗体时，焦点不是落在用户名的文本框，而是在其他地方，你可以在窗体设计视图中，单击【视图】菜单，选择【Tab键次序】命令，设置一下就可以了 【事件过程：】 Private Sub 确定_Click Dim a If Forms![登录]!Text1 ASDF And Forms![登录]!T