1第1章VB概述教学目的要求:了解VB的发展过程和特点掌握VB集成开发环境教学重点VB集成开发环境及工作模式1.1VB的发展过程和特点*演示VB小程序,说明VB学习重要性及方法。一、发展过程:学习版:LearningVB的基础版本,为初学者提供轻松的编程开发环境。专业版:Professional为计算机专业编程人员提供的一套功能完备开发工具。包括学习版的全部功能。企业版:Enterprise提供大型网络开发程序,包括专业版功能。二、VB6.0主要功能特点VB是基于windows环境的可视化程序设计语言。即继承了结构化程序设计特点,又具有面向对象语言特点1事件驱动的编程机制2友好的VB集成开发环境3支持多种数据库系统的访问4支持动态数据交换、动态链接库、对象的链接与嵌入技术及ActiveX技术,主要提供共享其它资源的技术5完善的联机帮助1.2VB6.0集成开发环境1、VB6.0安装(略)、启动、界面组成2、VB6.0三种工作模式:设计模式:用户可以进行界面、程序代码的编辑运行模式:程序运行结果,此时界面和程序代码不能编辑。中断模式:程序运行暂时中断,此时可以编辑代码,不能编辑界面。(举例说明)如:计算圆面积窗体,说明设计模式,运行模式,中断模式。2第2章VB应用程序设计过程教学目的要求:理解面向对象程序设计及概念掌握常用基本控件及应用掌握VB工程开发设计步骤教学重点掌握常用基本控件属性、方法、事件教学难点:面向对象程序设计中对象、属性、方法、事件概念2.1面向对象程序设计基本概念一.对象概念对象含义:一是客观世界中的每一个实体。二是对象是数据和操作的集合.类的概念:是对具有相同属性和相同操作的一组对象的共同描述,是同种对象的抽象。二、对象的三要素VB中对象三要素:属性、事件、方法。1、属性:是用来描述对象的特性。不同的对象有不同的属性属性都有其属性值。同一属性中不同对象的属性值也不相同。(举例说明)VB中对象属性设置:在属性窗口上设置在程序代码中:对象名.属性名=属性值例如:窗体标题设为:学生成绩管理系统.其中标签标题为“长春工程学院”,黑体,60点阵字.2、事件:在VB中,系统为每一对象预先定义好一系列的动作。每个事件都有相应的事件过程,事件过程是通过执行一段程序代码来实现的。常见的事件:单击(Click)双击(DblClick)装入(Load)鼠标移动(MouseMove)鼠标抬起(Mouseup)鼠标按下(Mousedown)获取焦点(GotFocus)事件过程的一般格式:PrivateSub对象名_事件名([参数表])程序代码EndSub3、方法:方法是指对象本身能执行的动作。系统为不同对象提供的一种功能(系统函数或过程),可供用户直接调用。一般格式如下:3对象名.方法名[参数]窗体常用的方法:Print、Show、hide、Cls、Move等.例如:在窗体中输出:VisualBasic程序设计。Form1.PrintVisualBasic程序设计举例说明:对象的属性、事件和方法单击显示按钮,在窗体中显示:长春工程学院2.2窗体的属性、方法和事件一、窗体常用属性窗体属性决定了窗体的外观和操作。用两种方法来设置窗体属性:一是通过属性窗口设置;二是在窗体事件过程中通过代码来设置:对象名.属性名=属性值。序号属性说明默认值1Name(名称)窗体的名称。Form12Caption(标题)窗体标题栏上显示的文字Form13Width(宽度)窗体的水平宽度4Height(高度)窗体的垂直高度5Left(左边界限)窗体左上角距屏幕左边的距离6Top(上方界限)窗体左上角距屏幕顶部的距离7ForeColor(前景色)窗体工作区前景色,正文颜色8BackColor(背景色)窗体工作区的背景色9Enabled(可用)决定窗体是否响应用户的事件TureFalse10Visible(可见)决定运行后窗体是否可见TureFalse序号属性说明默认值11Font(字体)窗体显示字体的属性(设置字体、字形、大小、效果).宋体12MaxButtonMinButton窗体是否有最大化按钮(Ture,False)窗体是否有最小化按钮(Ture,False)Ture13Moveable决定窗体是否能移动.Ture,False.Ture14BorderStyle(边界)设定窗体边界的样式0:无框线,位置、大小固定;1:单线大小固定;2:可调整;3:固定大小的对话框;4:固定大小的工具窗口;5:可调整的工具窗口2-可调整415Icon(图标)设定/改变窗体图标16Picture设置在窗体上显示的图形无17WindowState(窗体状态)窗体显示状态。0:正常;1:最小化;2:最大化0-正常代码中设置:Form1.caption=“计算窗口”Form1.FontName=黑体Form1.FontSize=40Form1.FontBold=True是否粗体Form1.FontItalic=False是否斜体Form1.FontStrikethru=True是否加删除线Form1.FontUnderline=False是否加下划线Form1.BackColor=RGB(255,255,0)黄色RGB(红,绿,蓝)函数,三原色混合,值在0-255之间Form1.BackColor=QBColor(1)蓝色QBColor(参数)函数参数为0-15,代表16种颜色。或用系统常量VBred,VBblue,VBgreen等。Form1.Height=5000像素点Form1.Picture=Loadpicture(“d:\user1\图像1.bmp”)二、窗体常用方法窗体的方法在程序代码中设置,调用方法的一般格式为:对象名.方法名[参数1,参数2,…]Show方法:显示窗体,格式:窗体名.ShowHide方法:隐藏窗体,格式:窗体名.HideCls方法:清除窗体上用Print方法显示的信息,格式为:窗体名.ClsMove移动窗体位置或改变大小语法格式为:窗体名.MoveLeft,[Top],[width],[height]如:form1.move200,100,6000,8000Print在窗体中输出信息;格式:[窗体名].Print输出内容如:Form1.print“ABCD”Form1.print“中国长春”Print1+2Print“abcd”,3.14,1+2,“长春”每一项各占一个输出区(14列)Print“abcd”;3.14;1+2;“长春”紧凑格式输出。三、窗体的事件Click(单击)事件单击窗体空白区事件.DblClick(双击)事件双击窗体空白区事件.Load(装入)事件当窗体被装入时,设置其初始化属性.Activate(活动)事件当窗体为活动窗口时,响应事件Unload(卸载)事件当卸载窗体时,响应事件如:关闭窗口时,用msgbox()提示.5Mousedown.Mouseup,Mousemove鼠标事件KeyPress,KeyDown,KeyUp键盘操作事件*事件过程包括相应的过程代码四、MDI窗体:窗体布局中的一种多文档界面“工程”菜单—“添加MDI窗体”父窗体:添加的MDI窗体,子窗体:普通窗体,将其MDIChild属性为True五、窗体装载和卸载装载窗体:load窗体名将已设计好的窗体调入内存,但不显示,显示需用show方法.卸载窗体:Unload窗体名或UnloadMe或End多窗体启动设置:“工程”—”工程属性”或在工程窗口,用快捷菜单,选“工程属性”。2.3基本控件VB6.0控件分为三类:标准控件(内部控件):由VB本身提供的控件,如标签、文本框、等。启动VB后,显示在工具箱中,既不能添加,也不能删除。ActiveX控件:OLE控件或定制控件。使用前必须事先添加到工具箱中,否则不能使用。可插入对象:其它应用程序。一、标签(Label)VB提供的标签控件只能显示文本,而不能编辑文本。标签通常用Caption属性,描述说明信息,或用于输出。标签属性name:标签的名字Caption:标签的标题。Alignment:确定标签中标题的对齐方式0-LeftJustify缺省值,标题左对齐。1-RightJustif标题右对齐。2-Center标题居中。AutoSize:是否根据标题自动调整大小。True,FalseBackStyle:选择标签是否透明。1(缺省值)不透明;0标签透明。*标签字体,标签位置属性(略)标签事件:常用Click、DblClick事件。例:设窗体上有一个标签名称为MyLabel,标题为“长春”,其AutoSize属性值为True。单击标签时,字体颜色变为兰色;双击标签时,则标签的标题字体增加10。属性窗口中设置(略)事件代码:PrivateSubmyLabel_DblClick()myLabel.FontSize=myLabel.FontSize+10EndSubPrivateSubmyLabel_Click()myLabel.ForeColor=QBColor(1)EndSub6标签方法:Move用于实现标签的移动。格式:对象名.Moveleft,[top],[width],[height]例1:双击标签,使之移动到左边距200,上边距100位置.例2:利用标签caption属性,显示输出信息.(利用&连接不同类型数据)例3:窗体上有一个标签控件Label1,单击该标签控件,使该标签控件向右、向下移动50,代码如下:PrivateSubLabel1_C1ick()Label1.MoveLabel1.Left+50,Label1.Top+50EndSub二、文本框(Text)在VB中,文本框通常作为输入控件,也可作为数据输出。常用文本框属性Text属性:设置文本框中显示的内容。Text1.Text=“欢迎使用VisualBasic”Text1.Text=123Alignment属性:文本对齐方式MultiLine属性:是否可以输入或显示多行文本。属性窗口设置:True,FalseMaxlength属性:设置文本框最大字符数。(0无限制)PasswordChar属性:用于输入保密口令。如设置*、#等ScrollBars属性:在MultiLine属性值为True时,决定文本框是否带滚动条。0-None没有滚动条1-Horizontal只有水平滚动条2-Vertical只有垂直滚动条3-Both同时具有水平和垂直滚动条Locked属性:决定文本框内容是否可以编辑。Ture不能编辑,常用于输出显示结果。False默认值,表示可以编辑,用于输入数据。其他属性:Font,forecolor,backcolor,top,left,height,width文本框常用事件Click、DblClick、Change、GotFocus、LostFocus、KeyPress等方法SetFocus如:Click事件;如:设计text1初始值为0,每次单击增加1如:Dblclick事件;如:设计text1,字体变大10点阵。Change事件:文本框内容改变时,发生事件。如:建立两个文本框。运行时,Text1中内容变化时,Text2显示相同内容。Gotfocus事件:用Tab键或用鼠标选中该对象时,触发该事件,称之为“获得焦点”。LostFocus事件:用Tab键或用鼠标选择其他对象时,触发该对象事件,称之为“失去焦点”。如:文本框内容获得焦点时,红色字;失去焦点时,绿色字。KeyPress事件:当在键盘上按下某个键时触发该事件。KeyPress事件返回一个参数KeyAscII,该参数值为按下键的ASCⅡ码。如:在文本框text1中输入字母a时,显示其ASCII码值。SetFocus方法:使文本框获得焦点如:text1.setfocus。使文本框text1获得焦点7PrivateSubCommand1_Click()Text1.Enabled=TrueText1.SetFocusTe