《第2章 可视化编程的概念与步骤.ppt》由会员分享，可在线阅读，更多相关《第2章 可视化编程的概念与步骤.ppt（42页珍藏版）》请在金锄头文库上搜索。
1、Visual Basic 程序设计,第2章 可视化编程初步,1,第2章 可视化编程初步,内容简介,2.1 窗体对象,2.2 可视化编程的概念,2.3 可视化编程环境,2,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,缺 省 窗 体,3,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,窗体的主要属性 Caption BorderStyle ControlBox MaxButton MinButton Width Height 的使用,Left Top Font BackColor ForeColor Icon Picture,4,第2章 可视化编程初步,
2、2.1 窗体对象2.1.1 单窗体程序设计,【例2-1】设计一个窗体，窗体上有3个命令按钮：“窗体变大”、“窗体变小”、“退出”。当程序运行后，窗体上还会显示一个狮子，狮子随窗体变大或变小。,设计界面,运行界面,5,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,步骤一：设计用户界面。在窗体上放置3个命令按钮。 步骤二：设置对象属性。,退出,Caption,窗体变大,Caption,CmdExit,名称,命令按钮3,CmdLarge,名称,命令按钮1,窗体变小,Caption,改变窗体尺寸,Caption,CmdSmall,名称,命令按钮2,Form1,名称,窗体,属性值,
3、属性名,对象,属性值,属性名,对象,6,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,步骤三：编写程序代码。 Load事件过程：窗体Form被加载到内存时，下面的程序段就会被执行（通常设置变量的初始值）。 Private Sub Form_Load() Picture = LoadPicture(D:VBlion.wmf) End Sub,7,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,在程序代码中设置Picture属性：LoadPicture函数 （1）文件名用西文双撇号，不能是中文双引号。 （2）文件名要带有路径。路径可以是绝对路径，也可以是相
4、对路径，图片外挂。如： Picture = LoadPicture(D:vblion.wmf) Picture = LoadPicture(App.Path & lion.wmf) （3）指定文件名为空，表示卸载已载入的图形文件。如 LoadPicture() 或 LoadPicture(),8,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,改变窗体的尺寸 Private Sub CmdLarge_Click() Height = Height + 500 Width = Width + 500 End Sub,9,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗
5、体程序设计,退出应用程序 Private Sub CmdExit_Click() End End Sub 步骤四：保存与调试,10,第2章 可视化编程初步,2.1 窗体对象2.1.1 单窗体程序设计,步骤五：补充与提高,11,第2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计,多重窗体的添加 / 删除 添加窗体 执行菜单命令“工程” / “添加窗体” 在“工程资源窗口”内执行右键菜单命令“添加” / “添加窗体” 删除窗体 可以激活该窗体，执行菜单命令“工程” / “移除窗体” 指向“工程资源窗口”欲删除的窗体名，执行右键菜单的“移除窗体”命令,12,第2章 可视化编程初步,2
6、.1 窗体对象2.1.2 多窗体程序设计,多重窗体的切换（隐藏 / 显示） Show方法兼有装入和显示窗体两种功能，格式： 窗体名称. Show Hide 方法使窗体隐藏，即不在屏幕上显示，但仍存在内存中，格式： 窗体名称. Hide,13,第2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计,多重窗体的启动 通过菜单命令“工程” / “工程属性” 指定一个启动窗体；若未指定，系统把设计时的第一个窗体作为启动窗体。 多重窗体的存取 每个窗体应分别保存到.frm的窗体文件中。 只须打开该工程的. vbp管理文件，则属于该工程的所有文件（包括.frm和.bas文件）均装入内存。 多重
7、窗体的编译 无论一个工程包括多少窗体，都可以通过菜单命令“文件” / “生成 *.exe” 生成Windows中的可执行文件。,14,第2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计,【例2-2】设计一个程序，程序中包括两个窗体。一个窗体显示红花，另一个窗体显示黄花。运行后先显示红花窗体，单击红花窗体后，显示黄花窗体；单击黄花窗体又返回到红花窗体。,15,第2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计,步骤一：设计界面 新建窗体Form2 先分别将Form1与Form2存盘，再将管理文件.vbp存盘,存盘前后工程窗口的区别,存盘前后工程窗口的区别,16,第
8、2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计,步骤二：设置属性（窗体） 名称缺省，标题为“红花”、“黄花” 步骤三：代码 窗体Form1代码 Private Sub Form_Load() Picture = LoadPicture(App.Path & red.jpg) End Sub 窗体Form2代码 Private Sub Form_Load() Picture = LoadPicture(App.Path & yellow.jpg) End Sub,？,系统能区分2个窗体的代码吗？,17,第2章 可视化编程初步,2.1 窗体对象2.1.2 多窗体程序设计, 从窗体
9、Form1切换到Form2 Private Sub Form_Click() Form1.Hide Form2.Show End Sub 从窗体Form2切换到Form1 Private Sub Form_Click() Form2.Hide Form1.Show End Sub,18,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,对象的属性（Properties） 属性用来表示对象的特征，每一种对象所具有的属性不同。 属性的设置 （1）在设计阶段，从属性窗口设置，只用于属性的初始化设置 先激活对象，再设置属性 （2）在运行阶段，由程序语句设置或改变属性
10、的值。 对象名. 属性名 = 属性值,19,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,对象的事件（Event）与事件驱动 事件是由系统事先设定的，能为对象识别和响应的动作。每一种对象能识别的事件是不同的。,20,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,每个事件过程由一个相应的事件触发（驱动），而不是由主程序调用。 事件驱动过程 ，程序没有固定的执行顺序。 窗体的系统事件：Load事件 窗体的用户事件 鼠标事件：Click 、MouseDown、MouseUp等 键盘事件：KeyPress、KeyDown
11、、KeyUp等 其它事件：DblClick、DragDrop、DragOver等,21,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,【例2-4】鼠标事件的使用。 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Print 执行了 MouseDown 事件 End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y
12、As Single) Print 执行了 MouseUp 事件 End Sub,22,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,鼠标事件的参数 Button：该参数是个整数，包含被用户按下或释放时鼠标按钮的值。在该整数的二进制位中b0=1表示鼠标的左键被按下；b1=1表示鼠标的右键被按下；b2=1表示鼠标的中键被按下。 Shift：该参数是整数，表示Shift、Ctrl、Alt键的状态。在该整数的二进制位中b0=1表示Shift键被按下；b1=1表示Ctrl键被按下；b2=1表示Alt键被按下。 X、Y：这两个值对应当前鼠标的位置，采用ScaleMo
13、de属性指定的单位。 例如：在窗体上按住Ctrl，然后在坐标为（200，300）的点上按下鼠标右键，则4个参数的值分别为2，2，200，300,23,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,【例2-6】用两个文本框 显示鼠标指针所指的位置,Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) txtX.Text = X txtY.Text = Y End Sub,24,第2章 可视化编程初步,2.2 可视化编程的概念 2.2
14、.1 对象的属性、事件和方法,【例2-5】学习键盘事件的过程。用户按了键盘上的任意一个键，窗体上都会显示出用户按的是哪个键，以及该键的ASCII码值。 Private Sub Form_KeyPress(KeyAscii As Integer) Print 你按的是 & Chr(KeyAscii) & 键，它的 ASCII码值是 & KeyAscii End Sub （Chr参见第4章常用函数）,25,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,对象的方法（Method） 对象的方法是对象执行的动作，即对象本身含有的函数和过程。 “方法”是针对对象的，
15、所以调用“方法”的形式与调用一般子程序和函数不同，应该指明是哪个对象调用的。即 对象名.方法名 参数1，参数2，,26,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,窗体的常用方法 Cls方法：清除窗体或图片框上的文字或图形。 对象名. Cls Move方法：设置或改变窗体（标签框、文本框、命令按钮等）的位置及大小。 对象名. Move Left, Top, Width, Height Print方法：在窗体、图片框或打印机上显示输出信息。 对象名. Print 输出项1，输出项2， Refresh方法：用于一切可显示对象的刷新显示。 对象名. Refr
16、esh SetFocus方法：为一切可接受焦点的对象设置焦点。焦点是对象接受鼠标或键盘事件的能力。 对象名. SetFocus,27,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法,【例2-3】使用Cls方法清除窗体或图片框中的文字或图形。,28,第2章 可视化编程初步,2.2 可视化编程的概念 2.2.1 对象的属性、事件和方法, “窗体显示”命令按钮的Click事件过程 Private Sub CmdShow_Click() Font.Size = 18 Print Cls方法的使用 End Sub “图片框画圆” 命令按钮的Click事件过程 Private Sub CmdCircle_Click() Picture1.Circle (500, 500), 400 End Sub,29,第2章 可视化编程初步,2.2 可视化编程的概念
