03多窗体与菜单.pptVIP

第3章 多窗体与菜单 实用的软件几乎都是多窗体并拥有菜单 通过本章您可以学会创建一个多功能的比较实用的程序 关于多窗体可参阅教材第6.7节 关于菜单可参阅第10.3节 关于msgbox和inputbox可参阅第4.2.3节 提前组合的原因是让同学尽早学会开发完整的程序 3.1 多窗体 知识要点： 一个VB程序可以包括多个窗体 添加一个窗体－－右击工程资源窗口 设置启动对象－－进入工程属性 打开窗体 －－ 窗体名.show [vbModal] 退出本窗体 －－ unload me 退出整个程序－－end 提示：教材6.7节的描述不利于初学者的入门 [例1]设计程序，窗体1中有3个按钮，单击分别进入窗体A、窗体B、窗体C。 [例2]例1的修改：只能从窗体1进入窗体A，只能从窗体A进入窗体B，只能从窗体B进入窗体C。 [例3]修改上述程序，启动对象设置为窗体B，如何可以进入所有窗体。 3.2 菜单 通过“工具”－“菜单编辑器”可以设计菜单 主菜单项设置 子菜单项设置 子菜单项变为主菜单项 菜单项的插入/删除 菜单项的修改 菜单项的动作编程 关于菜单的学习最好不要看书，而是直接动手 [例4]三个实验题各用一个窗体，主窗体通过菜单将各题构成整体。 （1）主窗体的标题设置为“实验3”＋学生的姓名＋学号（2）菜单：第一题、第二题、第三题、退出（3）第一题的标题：“第一题”＋学生姓名＋学号（4）其他各题的标题也类似设置。 （5）注意检查一下，主窗体要设置为启动 （6）保存整个工程，注意一定要保存在一个新建的文件夹中，文件夹取名为“学号－姓名”的格式 3.3 msgbox Msgbox用于弹出一个对话框 msgbox格式单个按钮的情况:msgbox 提示信息，样式，标题多个按钮的情况：v= msgbox(提示信息，样式，标题)MsgBox 欢迎进入本系统, vbOKOnly, 我的系统a=MsgBox (库存不够，继续吗？, vbYesNo+vbQuestion, 我的系统) Msgbox的更多样式按钮： vbOkOnly 确定 vbOKCancel 确定/取消 vbAbortRetryIgnore 终止/重试/忽略 vbYesNoCancel 是/否/取消 vbYesNo是/否 vbRetryCancel重试/取消图标： vbCritical vbQuestion vbExclamation vbInformation 例5 msgbox的各种情况举例MsgBox 欢迎进入本系统MsgBox 欢迎进入本系统, , 我的系统MsgBox 欢迎进入本系统, vbOKOnly, 我的系统MsgBox 欢迎进入本系统, vbOKOnly+vbExclamation, 我的系统a=MsgBox (库存不够，继续吗？, vbYesNo+vbQuestion, 我的系统)a = MsgBox(任务未完成，确定要退出？, vbOKCancel + vbExclamation, 我的系统) Msgbox的返回值 vbOK vbCancel vbAbort vbYes等 a=MsgBox (库存不够，继续吗？, vbYesNo+vbQuestion, 我的系统)b = MsgBox(任务未完成，确定要退出？, vbOKCancel + vbExclamation, 我的系统)a的值是vbYes或者vbNob的值是vbOK或者vbCancel 例7 2个窗体t1、t2，在t2中输入一个城市名称，输入的名称加入t1中的标签中，输入后提示“输入成功！继续输入吗，如果不继续，则退出t2 3.4 inputbox inputbox用于输入数据格式：变量＝inputbox(提示信息,标题,默认值) 课堂提问 Form2.show与form2.show vbmodal有什么区别？ 关闭当前窗体回到主窗体用end还是unload me? MsgBox(aaa, vbOKCancel, 我的系统) 这个对话框有几个按钮？ 以下语句有什么不对之处？MsgBox 任务未完成，确定要退出？, vbOKCancel + vbExclamation, 我的系统 3.5 巩固练习 [练习1]设计程序，当输入指定的密码时，进入主界面。输入三次错误，则退出。 * *