在主窗体中,选择点击修改密码菜单项,将弹出修改密 码窗体,如图8-7 修改密码 ROI 用户名 admins 输入密码 确认密码:******* 甬言 「取消」 图8-7修改密码窗体 一般说来,多重窗体的设计可以按照以下步骤进行: (1)分析应用程序要求,划分功能模块。 (2)分别创建各模块及其包含的各个窗体。 (3)建立窗体之间的调用关系 (4)点击[工程Ⅵ属性]菜单,在[启动对象中选择系统运行时首 先执行的对象。 (5)运行应用程序
在主窗体中，选择点击修改密码菜单项，将弹出修改密 码窗体，如图8-7。 图8-7 修改密码窗体 一般说来，多重窗体的设计可以按照以下步骤进行： （1）分析应用程序要求，划分功能模块。 （2）分别创建各模块及其包含的各个窗体。 （3）建立窗体之间的调用关系。 （4）点击[工程]/[属性]菜单，在[启动对象]中选择系统运行时首 先执行的对象。 （5）运行应用程序
多窗体设计常用方法: Load<窗体名称> 装入窗体到内存。但并不显示该窗体。 Unload<窗体名称> 从内存中卸载窗体。只移走窗体的可视部分,而不包 括窗体的命令和程序,和该窗体模块相关联的代码还保持 在内存中。 窗体名称]Show模式 显示一个窗体。如果指定的窗体在此之前已由L0ad装 载,则显示之;如果调用Show方法时指定的窗体没有装载, ⅤB将自动装载并显示该窗体 模式可取值0(默认值)或1。当模式为0即显示无模式 窗体时,随后遇到的代码要执行,比如可以显示其它的窗 体。当模式为1即显示模式窗体时,则随后的代码直到该窗 体被隐藏或卸载时才能执行。 窗体名称],Hide 隐藏窗体,但并没有删除
多窗体设计常用方法： Load <窗体名称> 装入窗体到内存。但并不显示该窗体。 Unload <窗体名称> 从内存中卸载窗体。只移走窗体的可视部分，而不包 括窗体的命令和程序，和该窗体模块相关联的代码还保持 在内存中。 [窗体名称].Show [模式] 显示一个窗体。如果指定的窗体在此之前已由Load装 载，则显示之；如果调用Show方法时指定的窗体没有装载， VB将自动装载并显示该窗体。 模式可取值0（默认值）或1。当模式为0即显示无模式 窗体时，随后遇到的代码要执行，比如可以显示其它的窗 体。当模式为1即显示模式窗体时，则随后的代码直到该窗 体被隐藏或卸载时才能执行。 [窗体名称].Hide 隐藏窗体，但并没有删除
续前引例,在登录窗体输入用户名和口令,单击“确定”按钮的 代码 Private Sub Cmdok Click0 声明变量 .校验用户名和口令 I用户名或密码错误Then Msg Box"无此用户或密码错误,请重新输入!", acRitical,"错误 Else FrmMain Show 载入主窗体 Unload Me 从内存删除登录窗体 End If End sub 在学籍管理系统主窗体单击修改密码菜单项的代码: Private Sub mnu ChangePsw Click'单击修改密码菜单项 frm Psw. show 显示修改密码窗体 End Sub 在修改密码窗体单击“取消”按钮的代码: Private Sub CmdCancel click Unload me 从内存删除修改密码窗体 End Sub
续前引例，在登录窗体输入用户名和口令，单击“确定”按钮的 代码 在学籍管理系统主窗体单击修改密码菜单项的代码： Private Sub CmdOk_Click() … '声明变量 … '校验用户名和口令 If 用户名或密码错误Then MsgBox "无此用户或密码错误，请重新输入！", vbCritical, "错误" Else FrmMain.Show '载入主窗体 Unload Me '从内存删除登录窗体 End If End Sub 在修改密码窗体单击“取消”按钮的代码： Private Sub mnuChangePsw_Click() '单击修改密码菜单项 frmChangePsw.Show '显示修改密码窗体 End Sub Private Sub CmdCancel_Click() Unload Me '从内存删除修改密码窗体 End Sub