第2讲 窗体与菜单

1、第二章 VB可视化用户界面,一、对象、属性、方法和事件 二、窗体 三、菜单 四、VB基本控件,一、 对象、属性、方法、事件,对象：具有特定的属性和方法，并能响应事件的实体。 属性：对象的性质 方法：对象能完成的动作 事件：系统或用户对对象进行的操作 VB中的对象：窗体和控件,对象的例子,一个汽车对象 属性：颜色、重量、长度、发动机功率等 方法：向前行使、向后行使、加速、减速等。 事件：踩（放）油门等,对象的例子,一个手机对象： 属性：型号、颜色、大小等 方法：呼入号码、呼出号码、发送短信息、接收短信息 事件：按下手机上的按钮,对象,Vb中的对象简单地说就是各种窗体、按钮控件、文本框控件、组合框

2、控件等。 对象的生成： 启动VB自动生成窗体对象 将工具箱内各种控件放置在窗体上生成相应的对象。,属性,属性是一个对象的性质，如对象的宽度（width）、高度（height）、位置（left/top）、颜色（backcolor）、标题（caption）、字体（font）等。 属性可以在属性窗口设置，也可以在代码窗口设置。,方法,方法是对象可以完成的动作，如窗体对象的数据输出（print）方法、移动（move）方法、隐藏（hide）方法等。 在代码窗口中调用，格式是： 对象名.方法名,事件,事件就是能够被对象响应和识别的动作。事件可以由系统触发，也可以由用户操作触发。如用户使用键盘输入文字，触发

3、窗体对象的KeyPress事件。 在代码窗口添加。,“代码编辑器” ：用于显示和编写程序代码。,二、窗体,窗体的生成 窗体的属性 窗体的方法 窗体的事件 窗体的应用 多窗体的设计,1. 窗体的生成,窗体是VB的一种对象，是构造用户界面的框架。程序运行时，窗体直接面向用户，是用户与程序交互的平台。 启动Visual Basic时自动生成一个窗体，缺省名称是Form1。 添加更多的窗体：,缺省名称是Form2依次类推。,系统菜单,标题栏,关闭按钮,最小化按钮,最大化按钮,边框,窗体工作区,2. 窗体的属性,窗体的属性用来设置窗体的一些外观 (1) 基本属性（参见：19页，表2-1） (2) 属性的

4、设置 属性窗口 代码窗口,（1）常用的属性,(2) 属性的设置,1.在【属性】窗口中直接设置,属性窗口,对象选择框,下拉按钮,字母序选项卡,分类序选项卡,属性列表框,属性说明框,2. 在代码中设置,(2) 属性的设置,对象名 . 属性名 = 属性值,Visual Basic提供上下文敏感性，在代码窗口中输入对象名和圆点时自动出现列表框，显示对象的属性和方法,3. 窗体的方法,常见方法:参见21页2.1.2 语法格式：对象名 . 方法名(参数列表),3. 窗体的方法,1.不带参数的方法,例：Form1.Refresh 把窗体上所有控件重新刷新一遍。,3. 窗体的方法,2. 带参数的方法,例：Fo

5、rm1.Move 1000,1000,5000,5000 把窗体移动到距显示器上边界、左边界各 1000 Twip的位置，并把窗体的高度和宽度都设置为5000 Twips。,4. 窗体的事件,窗体要响应外来的事件，用代码来实现。,例如：单击窗体时，窗体上显示“欢迎进入俄罗斯方块游戏”。,Form1.Print Welcome,事件名,对象列表,程序代码,常见事件,【例】编写一段程序代码实现以下功能：程序加载窗体之前出现一个对话框，启动之后每次用鼠标单击窗体，该窗体的面积将会变大。双击鼠标时窗体的背景色被改变。关闭窗体时也出现一个对话框。 Private Sub Form_Load() MsgB

6、ox 程序正在启动 End Sub Private Sub Form_Click() Form1.Height = Form1.Height + 200 Form1.Width = Form1.Width + 250 End Sub Private Sub Form_DblClick() Form1.BackColor = vbRed End Sub Private Sub Form_Unload(Cancel As Integer) MsgBox “该窗体即将被关闭” End Sub,5. 窗体的应用（vbp、exe）,启动VB 界面设计 在事件过程中编写程序代码。 运行和调试程序 保存程序

7、(.vbp) 生成可执行文件(.exe),6. 多窗体的设计,添加窗体： 方法1： 单击“工程”菜单栏-“添加窗体” 方法2： 右键单击工程资源管理器任何地方-“添加” -“窗体” 多窗体程序中，每个窗体都是独立的，拥有自己的界面和程序代码！,6. 多窗体的设计,设置启动窗体 单击“工程”-“工程属性”，在“启动对象”列表中选择启动窗体。 默认情况下，第一个窗体被默认为启动窗体！,6. 多窗体的设计,窗体切换时常用的窗体方法和事件,6. 多窗体的设计,Unload方法： Private Sub Form_Click( ) Unload me 卸载代码所在的窗体 Unload Form1 卸载F

8、orm1窗体 End Sub Unload事件 Private Sub Form_Unload( ) 代码段 End Sub,6. 多窗体的设计,当一个窗体要显示在屏幕之前，必须先建立，接 着被装入内存（Load语句），最后显示（Show 方法）在屏幕上。同样，当窗体要结束之前，会 先从屏幕上隐藏（Hide方法），接着从内存中删 除（Unload方法）。,多窗体程序实例步骤1,1启动Visual Basic 6.0，选择“标准EXE”，单击“打开”按钮，创建一个标准EXE工程；如果VB系统已经启动，则在“文件”菜单中选择“新建工程”，创建一个标准EXE工程。VB自动创建了一个名为“工程1”的标

9、准工程，同时创建了一个名为“Form1”的窗体。,2修改窗体Form1的Caption属性为“这是第一个窗体”，BackColor属性为蓝色。,多窗体程序实例步骤2,3. 在Form1上添加一个命令按钮，将它的Caption属性设置为“单击可进入第二个窗体”。添加一个标签控件，将它的Caption属性设置为“欢迎学习VB”，BackColor属性为蓝色, ForeColor属性为红色。,多窗体程序实例步骤3,4鼠标右键单击窗体Form1，在弹出的菜单中选择“添加”-“添加窗体”，为应用程序添加一个窗体Form2，将它的Caption属性设置为“这是第二个窗体”，BackColor属性为黄色。,

10、多窗体程序实例步骤4,5. 在Form2上添加一个命令按钮，将它的Caption属性设置为“返回第一个窗体”。添加一个标签控件，将它的Caption属性设置为“进入有趣的VB天地”，BackColor属性为黄色, ForeColor属性为绿色。,多窗体程序实例步骤5,多窗体程序实例步骤6,6为窗体Form1中的命令按钮编写代码。 Private Sub Command1_Click() Load Form2 Form2.Show Form1.Hide End Sub,7.为窗体Form2中的命令按钮编写代码。 Private Sub Command1_Click() Load Form1 Fo

11、rm1.Show Form2.Hide End Sub 实现两个窗体之间的切换。,多窗体程序实例步骤7,下一个,“多窗体”上机题,完成实验教程【实验2-1】 错误处更改：,（6） Form2.BackColor = vbBlue Form2.ForeColor = vbWhite ,（7） Command1.BackColor = vbRed Command1.BackColor = vbGreen,创建3个窗体和1个标准模块 (1)主窗体(Form1) 本窗体上建立了“输入参数”(Command11) 、“画圆”(Command12)和“结束”(Command13)三个命令按钮 设置为启动窗

12、体,例多窗体应用示例 先输入圆参数后画圆,Private Sub Command11_Click() 主窗体“输入参数”按钮 Form1.Hide 隐藏主窗体 Form2.Show 显示“输入参数”窗体 End Sub Private Sub Command12_Click() 主窗体“画圆”按钮 Form1.Hide 隐藏主窗体 Form3.Show 显示“画圆”窗体 End Sub Private Sub Command13_Click() 主窗体“结束”按钮 Unload Form1 Unload Form2 Unload Form3 End End Sub,先卸载所有已打开的窗体,(2

13、)“输入参数”窗体(Form2) 这是在主窗体上单击了“输入参数”按钮后弹出的窗体，用于输入圆的坐标位置(x,y)和半径(r)。窗体上建立了3个文本框(Text21、Text22和Text23)和1个“返回”命令按钮(Command21) Private Sub Command21_Click() “输入参数”窗体的“返回”按钮 X = Val(Text21.Text) Y = Val(Text22.Text) R = Val(Text23.Text) Form2.Hide 隐藏“输入参数”窗体 Form1.Show 显示主窗体 End Sub,(3)“画圆”窗体(Form3) 这是在主窗体上

14、单击了“画圆”按钮后弹出的窗体。窗体上建立了1个图片框和2个命令按钮，如图所示。用户可以单击“画圆”(Command31)命令按钮，使之按给定参数在图片框上画圆。 Private Sub Command31_Click() “画圆”窗体的“画圆”按钮 Picture1.Cls Picture1.Circle (X, Y), R 在图片框上画圆，圆心(X,Y), 半径R End Sub Private Sub Command32_Click() “画圆”窗体的“返回”按钮 Form3.Hide 隐藏“画圆”窗体 Form1.Show 显示主窗体 End Sub,图片框 Picture1,(4)标

15、准模块(Modulel) 由于在各窗体之间需要使用公共变量来传送数据，所以建立一个标准模块Modulel，对用到的全局变量X、Y和R进行声明 运行程序后，首先显示主窗体。在主窗体上，用户可通过“输入参数”和“画圆”两个按钮来选择进入不同的窗体，例如单击“输入参数”按钮，则主窗体消失，显示“输入参数”窗体。在“输入参数”窗体或“画圆”窗体上，单击“返回”按钮，又可以隐藏当前窗体和重现主窗体,程序一般从启动窗体的Form_Load过程开始执行 有时在程序启动时不加载任何窗体，而是首先执行一段程序代码，此时可把要执行的程序代码放在Sub Main过程中，并指定Sub Main为“启动对象”。 应用程

16、序在运行时会先执行Sub Main过程 Sub Main过程存放在标准模块中。在一个工程中只能有一个Sub Main过程 设置Sub Main过程为“启动对象”的方法：在“工程属性”对话框的“通用”选项卡中，从“启动对象”下拉列表框中选中“Sub Main”,Sub Main过程,2.3 菜单,菜单的基本概念 菜单编辑器 特殊效果的菜单 设计下拉式菜单 设计弹出式菜单,1. 菜单的基本概念,菜单是建立在窗体上的一种特殊对象，它将应用程序的各种功能分类显示出来。程序运行时，执行菜单可以实现程序的功能。 分类：下拉菜单和快捷菜单 制作：菜单编辑器,2. 菜单编辑器,打开菜单编辑器 方法1： 单击菜

17、单栏中“工具”-“菜单编辑器” 方法2： 右击窗体，从快捷菜单中选择菜单编辑器。,用来输入菜单或菜单项的标题，相当于Caption属性。,用来输入菜单和菜单项的名称，相当于Name属性：mnu+描述性名称,为用户建立的控件数组设立下标。,键盘键的组合，执行菜单项的快捷方式。,键入数值用来在帮助文件中查找相应的帮助主题。,选择菜单项显示的位置，0-None (不显示)、1-Left(靠左)、2-Middle (居中)、3-Right(靠右)。,选中时，可以在相应的菜单项旁边加上记号，指示菜单项处于活动状态。,设置菜单是否响应事件。,确定菜单项是否可见。,用于多文档程序。,当前的菜单项向上提升一级。,当前的菜单项向下降一级。,在菜单列表框中将当前菜单项上移。,在菜单列表框中将当前菜单项下移。,开始新菜单项的编辑。,在当前菜单项之前插入新的菜单项。,删除当前菜单项。,3. 特殊效果的菜单,分隔条菜单（将菜单项分组）： 标题栏中输入减号“” 菜单访问键（ Alt+字母键，用于打开此菜单的下拉部分）： 标题栏中输入“&字母键”。 快捷键（可直接执行菜单项命令）： 在快捷键列表中选择键的组合 灰色菜单（使菜单项不可用）： 不选“有效”。 记号菜单（指示菜单项处于活动状态）： 选中“复选”。,4. 设计下拉式菜单,制作方法：选中菜单编辑器中的“可见”,5. 设计弹出式菜单,制作方法： 步骤1：