VB应用程序设计过程.ppt

《VB应用程序设计过程.ppt》由会员分享，可在线阅读，更多相关《VB应用程序设计过程.ppt（29页珍藏版）》请在装配图网上搜索。

1、1,Visual Basic 程序设计,2,第2章 VB应用程序设计过程,教学目的要求： 理解面向对象程序设计方法,概念 掌握常用基本控件及应用 掌握VB工程开发设计步骤 教学重点 掌握常用基本控件属性、方法、事件 面向对象程序设计方法 教学难点： 面向对象程序设计中对象、属性、方法、事件概念,3,传统结构化程序设计方法：,从功能出发，研究程序执行过程。从第一行开始执行,并按照预定的路径执行,用户无法改变程序的流程,面向对象的程序设计方法：,从对象出发，研究对象属性,采用事件驱动。事件过程包含程序代码.,2.1 面向对象程序设计一、程序设计方法：,例如:计算y=IxI （结构化设计过程） 1、

2、任意输入x值 2、利用选择结构，判断x=0或,x=0, y=x; 否则y=-x 4、输出y值,例如:计算y=IxI （面向对象设计过程） 1、x输入对象，y输出对象 2、设计窗体，其中x 文本框，y 标签 和计算按钮 3、在计算按钮单击事件中编写代码，完成计算。,4,对象是系统中的基本运行实体,是数据和操作的集合.,理解： 1.在VB环境中所涉及到的窗体、控件和菜单项等均为对象。 2.对象是具有属性和行为的实体。建立对象后，用该对象的属性、事件和方法来描述。 例如:现实生活中的实体都可以看作对象,一本书,一个学生. VB中窗体,窗体中标签、文本框、按钮等.,类是具有相同属性和操作的对象集合.,

3、一个对象就是类的一个实例。例如：学生张三是对象；所有学生是一个类。,二、面向对象中常见概念,5,属性：对象的特性，不同的对象有不同的属性。,如对象标题(Caption), 名称(Name), 颜色(Color), 字体(Font),位置,大小等.,属性设置： 1、在属性窗口上设置（实际操作） 2、在程序代码中用赋值语句设置：对象名属性名=属性值,例：窗体标题设置为：学生成绩管理系统. 其中标签label1:标题为 “长春工程学院”, 黑体,60点阵字.,6,在VB中，系统为每一对象预先定义好一系列的事件。每个事件执行程序代码的过程，称为事件过程。 如常见的事件: 单击(Click) 双击(Db

4、lClick) 装入事件(Load) 改变事件(Change) 鼠标移动事件(MouseMove) 鼠标抬起事件(Mouseup) 鼠标按下事件(Mousedown) 获取焦点事件(GotFocus),事件是指发生在对象上的特定操作。,事件过程的一般格式: Private Sub _() End Sub,7,如:窗体的打印方法(Print) 、显示方法(Show) 、隐藏方法 (hide) 清除方法(Cls) 、移动方法(Move)等.,方法调用格式:对象名.方法 参数名,方法是指对象本身能执行的动作。系统为不同对象提供的一种动作（系统函数，过程）,可供用户直接调用。,Private Sub

5、Form_Activate() Print 欢迎使用VB6.0 End Sub Private Sub Command1_Click() Form2.Show Form2.Print 向大家问好 End Sub,如：设计两个窗体form1,form2 ，先显示form1,输出“欢迎使用VB6,0” ， 单击按钮, 再显示form2, 输出 “向大家问好”,8,一、窗体(Form) 窗体是VB中最常见的对象,也是可视化程序设计的基础。各种控件对象必须建立在窗体上.窗体-”容器” 1、窗体操作建立、添加、删除 建立新工程时，系统自动创建一窗体Form1； 若要增加新窗口时，可在“工程”菜单中选择“

6、添加窗体”项.,2.2 介绍窗体、命令按钮、标签、文本框的属性、事件和方法,9,一个工程中包含若干窗体,从“工程”菜单中选择“移除”命令,10,2、窗体属性,窗体的属性设置: 通过属性窗口，也可以在程序代码中设置。,常用的窗体属性有： Name(名称) 窗体名称(窗体文件名,扩展名为.frm ). BackColor 窗体的背景颜色 . Caption 标题栏显示的内容. ControlBox 决定窗体是否具有控制菜单. Font 窗体显示字体的属性(设置字体、字形、大小、效果). Forecolor 窗体显示字体的颜色. MaxButton 决定窗体是否有最大化按钮 Ture，False.

7、MinButton 决定窗体是否具有最小化按钮. Moveable 决定窗体是否能移动. Picture 设置在窗体上显示的图片.,11,WindowState 运行时窗体状态:正常、最小化、最大化 Height、Width、Left、Top 窗体高度、宽度、左边距、上边距Visible 窗体运行是否可见 Borderstyle 窗体样式选择（边框等）,代码中设置: Form1.caption=“计算窗口” Form1.FontName = 黑体 Form1.FontSize = 40 Form1.FontBold = True 是否粗体 Form1.FontItalic = False 是否

8、斜体 Form1.FontStrikethru = True 是否加删除线 Form1.FontUnderline = False 是否加下划线 Form1.BackColor = RGB(255, 255, 0) 黄色 RGB(红，绿，蓝)函数，三原色混合，值在0-255之间 Form1.BackColor = QBColor(1) 蓝色 QBColor(参数)函数 P16页颜色参数表 Form1.Height = 5000 像素点 Form1.Picture=Loadpicture(“d:user1图像1.bmp”),12,常用事件有： Click(单击)事件 单击窗体空白区事件. Dbl

9、Click(双击)事件 双击窗体空白区事件. Load(装入)事件 当窗体被装入时事件,设置对象初始化属性. Activate(活动)事件 当窗体为活动窗口时，响应事件 Unload(卸载）事件 当卸载窗体时，响应事件 如:关闭窗口时,用msgbox()提示. QueryUnload 事件 当卸载窗体之前，响应该事件 Resize事件 当窗体首次显示在屏幕上或窗体大小改变时,响应事件. Mousedown. Mouseup, Mousemove 鼠标事件 KeyPress ，KeyDown ，KeyUp 键盘操作事件 * 事件包括相应的过程代码,3 窗体事件和方法,13,常用方法：,Show

10、显示窗体 , 语法格式为：窗体名 .Show Hide 隐藏窗体 , 语法格式为：窗体名 . Hide Cls 清除窗体上用Print方法显示的信息 语法格式为：窗体名.Cls Move 移动并改变窗体的位置和大小 语法格式为：窗体名.Move ,Top ，width, height 如：form1.move 200,200,6000,8000 Print 在窗体上输出信息；格式： 窗体名 . Print 输出内容 Form1.print “ABCD” Form1.print “中国长春” Print 1+2 Print “abcd” , 3.14 , 1+2 , “长春” 每一项各占一个输出

11、区，每个区占14列 Print “abcd” ； 3.14； 1+2 ； “长春” 紧凑格式输出。,14,4、MDI窗体:窗体布局中的一种多文档界面,父窗体,子窗体,15,创建MDI窗体方法：,父窗体：添加的MDI窗体 子窗体：普通窗体,将其 MDIChild属性为True,16,5、窗体装载和卸载,装载窗体：load 窗体名 将已设计好的窗体调入内存,但不显示,显示需用show方法. 卸载窗体：Unload 窗体名 或 Unload Me 或 End 多窗体启动设置： “工程”工程属性”或在工程窗口,用快捷菜单,选 “工程属性”。,17,例题： 1、演示P22-23例题,18,二、命令按钮C

12、ommand,命令按钮控件：常用来接受用户的操作信息,激发相应的事件过程。,19,命令按钮主要属性,Name 名称，默认command1、command2 Caption 标题 Font 字体设置(字体,字形,大小等) Enabled 是否有效 Style 标准/图形按钮 Picture 添加图形/图像( Style 为图形状态) Visible 是否可见,20,命令按钮常用事件: 鼠标单击(Click) 鼠标按下(MouseDown) 鼠标抬起(MouseUp) 鼠标抬起(Mousemove) 如:设计按钮,鼠标按下显示时间, 抬起显示日期,命令按钮常用方法: 可以用SetFocus方法将焦

13、点定位在指定的命令按钮cmdok上. 如：在窗体的Activate事件中: cmdok.SetFocus 表示将焦点定位在名称为cmdok的命令按钮上.,21,例如：设计如下窗体，显示字体为20点阵，黑体。计算按钮自动获得焦点。,Private Sub Command1_Click() Print 半径为10圆的面积为; 10 * 10 * 3.14 End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Activate() Command1.SetFocus End Sub Private Sub Fo

14、rm_Load() Form1.FontName = 黑体 Form1.FontSize = 20 End Sub,22,标签属性 Caption： 标签的标题。 Alignment：确定标签中标题的对齐方式 0-LeftJustify 缺省值，标题左对齐。 1-RightJustif 标题右对齐。 2-Center 标题居中。 AutoSize： 是否根据标题自动调整大小。True，False BackStyle：选择标签是否透明。 1（缺省值）不透明；0 标签透明。 * 标签字体，标签位置属性（同窗体）,三、标签(Label),VB提供的标签控件只能显示文本，而不能编辑文本。标签通常用Ca

15、ption属性，描述说明信息，或用于输出。,23,标签事件： 标签控件常用Click、DblClick事件。 例：设窗体上有一个标签名称为MyLabel，标题为“长春”，其AutoSize属性值为True。单击标签时，字体颜色变为兰色；双击标签时，则标签的标题字体增加10。 属性窗口中设置( 略 ) 事件代码： Private Sub myLabel_DblClick() myLabel.FontSize = myLabel.FontSize + 10 End Sub Private Sub myLabel_Click() myLabel.ForeColor = QBColor(1) End

16、Sub,24,标签方法：Move 用于实现标签的移动。 格式：对象名Move left，top，width，height left： 指示对象左边的水距离。 top： 指示对象顶边的垂直距离。 width： 指示对象新的宽度。 height：指示对象新的高度。 例1:双击标签, 使之移动到新位置左边距200,上边距100. 例2:利用标签caption属性,显示输出信息.(利用&连接结果) 例3:设窗体上有一个标签控件Label1，单击该标签控件，使该标签控件向右、向下移动50，代码如下： Private Sub Label1_C1ick() Label1Move Label1Left + 5

17、0, Label1.Top + 50 End Sub,25,常用文本框属性 Text属性：设置文本框中显示的内容。 Text1.Text = “欢迎使用 Visual Basic” Alignment属性：文本对齐方式 MultiLine属性：是否可以输入或显示多行文本。 属性窗口设置:True,False Maxlength属性：设置文本框最大字符数。（0 无限制） PasswordChar属性：用于输入保密口令。如设置 *、# 等,四、文本框(Text),在VB中，文本框通常作为输入控件，也可作为数据输出。,26,ScrollBars属性：在MultiLine属性值为True时，决定文本框

18、是否带滚动条。 0-None 没有滚动条 1-Horizontal 只有水平滚动条 2-Vertical 只有垂直滚动条 3-Both 同时具有水平和垂直滚动条 Locked属性：决定文本框内容是否可以编辑。 Ture 不能编辑，常用于输出显示结果。 False 默认值,表示可以编辑,用于输入数据。 其他属性:Font,forecolor,backcolor, top,left,height, width,27,文本框的事件和方法,文本框常用事件Click、DblClick、Change、GotFocus、LostFocus、KeyPress等 方法SetFocus,Click事件；如：设计t

19、ext1初始值为0，每次单击增加1 Dbclick事件；如:设计text1,双击改变背景颜色,字体变大。 Change事件:文本框内容改变时，发生事件。 如:建立两个文本框。运行时，Text1中内容变化时，Text2显示相同内容。 Gotfocus事件：用Tab键或用鼠标选中该对象时，触发该事 件，称之为“获得焦点”。 如:设置文本框输入数据时，字体为黑体，20号,背景为绿色。 LostFocus事件：用Tab键或用鼠标选择其他对象时，触发该事件，称之为“失去焦点”。 如：文本框在失去焦点时,背景颜色变化。,28,KeyPress事件： 当在键盘上按下某个键时触发该事件。KeyPress事件返

20、回一个参数KeyAscII，该参数值为按下键的ASC码。 如:有一文本框，text1输入字母 a 时，显示ASCII码为97。 SetFocus方法：使文本框获得焦点 如：text1.setfocus。 使文本框text1获得焦点,Private Sub Command1_Click() Text1.Enabled = True Text1.SetFocus Text2.Enabled = False End Sub Private Sub Command2_Click() Text2.Enabled = True Text2.SetFocus Text1.Enabled = False End Sub,29,新建一个工程,设计用户界面,编写事件过程及通用过程代码,保存、调试、运行， 形成可执行文件,2.3 程序设计的基本步骤,* 举例说明建立VB工程的过程,VB文件类型（参考P29）,