(中职）Visual Basic 6.0程序设计第2章ppt课件-【中职专用】《计算机类》同步教学课件

VB程序设计基础 【实例1】 事件 【实例2】 变化的窗体 【实例3】 键盘与鼠标 【实例4】 选择窗体 【实例5】 有个性的按钮 【实例6】 登录对话框 【实例1】 事件 案例效果 在本例中，将演示程序在发生不同动作时，程序会发生什么样的事件。在这个程序中可以响应的事件有：窗口大小改变（Resize）事件，键盘按键被按下（KeyPress）事件，鼠标在窗体上单击（Click）事件和窗体被卸载（UnLoad）事件。 技术分析 事件驱动是VB程序运行机制的核心，当一个应用程序从开始运行时，就会发生一系列的事件（如程序加载事件Load）。程序启动完成后（即在程序运行的过程中），将一直等待着事件的发生（如发生了鼠标的单击事件Click），如果发生了什么事件，就转去执行该事件的相关代码，作为对事件的回应。 事件 （Event）是指发生在某一对象上的事情，是Visual Basic 中预先设置好的，可以被对象识别的动作。 操作步骤 （1）创建工程。按第1章中所学习的方法，启动中文Visual Basic 6.0，选择“标准 EXE”工程，进入中文VB6的集成开发环境。 （2）在窗体上双击，打开“代码”窗口，在“代码”窗口中输入以下代码。 程序代码： '鼠标在窗体上单击 Private Sub Form_Click() MsgBox "鼠标在窗体上单击，发生Click事件。" End Sub '键盘按钮被按下 Private Sub Form_KeyPress(KeyAscii As Integer) MsgBox "键盘按钮被按下，发生KeyPress事件。" End Sub '窗体被载入 Private Sub Form_Load() MsgBox "窗体被载入，发生Load事件。" End Sub '窗体大小被改变 Private Sub Form_Resize() MsgBox "窗体大小被改变，发生Resize事件。" End Sub '窗体被卸载 Private Sub Form_Unload(Cancel As Integer) MsgBox "窗体被卸载，发生UnLoad事件。" End Sub 知识进阶 当用户对一个对象发出一个动作时，会产生一个事件，然后自动地调用与该事件相关的事件过程，事件过程是在响应事件时执行的程序代码段。 事件过程一般由VB创建，是附加在窗体或控件上的，用户不能增加或删除，只能在过程内添加用户的事件处理代码，以完成对事件的响应。 思考练习 1. 填空题 （1）VB程序运行机制的核心是 ，在程序运行的过程中将一直等待着 的发生。 （2）鼠标单击事件是 ，窗体加载事件是 ，键盘按键按下时会发生的事件有 ，窗体卸载的事件是 。 （3）不同的对象 有相同的事件。 （4）事件的具体名称由 和 构成。 2. 问答题 （1）什么是事件？事件在程序中有什么作用？ （2）Msgbox函数在程序中有什么用途？ （3）当窗体加载时有哪些事件发生？ 【实例2】 变化的窗体 案例效果 窗体在屏幕的中央，窗体背景是一幅图像。单击窗体中的“最小化”按钮，可使窗体最小化，在Windows的状态栏中显示程序最小化后的按钮（按钮上 有最小化图标） 技术分析 1. 对象 对象（Object）是VB应用程序的基本单元，是代码和数据的集合，用VB编程的实质就是用对象组装程序。 2. 属性 属性（Property）是指用于描述对象的名称、位置、大小、颜色、字体等特性。 操作步骤 1．创建工程 （1）首先，按第1章所学过的方法创建一个“标准EXE”工程。 （2）然后，参照图2-1左图为窗体Form1添加标签控件和命令按钮。 2．设置对象的属性 对象名称 Caption值 对象名称 Caption值 对象名称 Caption值 Form1 窗体变化 Label1 窗体变化 Command1 最小化 Command2 最大化 Command3 正常 Command4 退出&E 3．程序代码编辑 按第1章所学的方法，打开“代码”窗口，在其中输入以下程序代码。 程序代码： Rem “窗体变化”的代码程序 Private Sub Command1_Click() '单击“Command1”按钮的事件过程 Form1.WindowState = vbMini