VB程序设计语言课件

1、Visual Basic 程序设计语言5.1Visual Basic语言简介5.2 Visual Basic集成开发环境5.3面向对象程序设计的基本概念5.4窗体的常用属性、事件和方法5.5命令按钮、标签、文本框第1页，共52页。5.1 Visual Basic的语言简介 5.1.1 Visual Basic的发展Visual Basic是Microsoft公司于1991年推出的基于窗口的可视化程序设计语言，版本号为1.0。“Visual”是“可视化”的意思。Visual Basic的语法与BASIC语言的语法基本相同，因此Visual Basic也具有易学易用的特点，但是其编程系统采用了面向

2、对象、事件驱动机制，与传统BASIC有很大的不同。1998年，又推出了Visual Basic 6.0（简称VB 6.0），该版本在创建自定义控件、对数据库的访问等得到进一步加强。Window2000推出后，又出现了VB.net。第2页，共52页。Visual Basic的版本 版本主要有三种：学习版专业版企业版它们按功能由弱到强分别是学习版、专业版和企业版。其中学习版功能最弱，但却是免费的，而专业版和企业版功能都是商业软件，但功能比学习版要强许多，比如有更多的控件等。第3页，共52页。5.1.2 Visual Basic的特点可视化面向对象的程序设计事件驱动编程机制结构化程序设计语言 可扩充

3、性数据库访问动态数据交换对象链接与嵌入第4页，共52页。5.1.3 Visual Basic的安装与启动 三种安装方式典型安装自定义安装最小安装第5页，共52页。5.1.3 Visual Basic的安装与启动 启动Visual Basic 6.0方法一：开始菜单/程序/Microsoft Visual Basic6.0中文版/Microsoft Visual Basic6.0中文版 方法二：找到安装有VB软件的文件夹，用鼠标双击vb6.exe文件的图标。 方法三：开始菜单/运行，找出vb6.exe文件运行。 方法四：建立快捷方式。鼠标双击快捷方式图标。 第6页，共52页。标题栏菜单栏工具栏工

4、具箱窗体窗口代码窗口立即窗口工程窗口属性窗口窗体布局窗口5.2集成开发环境第7页，共52页。5.2 集成开发环境标题栏缺省标题为 “工程1-Microsoft Visual Basic设计”。方括号中的“设计”表示此时的开发环境为“设计模式”。 VB有三种工作模式：设计模式：可进行用户界面的设计和代码的编制。运行模式：运行应用程序，这时不可编辑代码，也不可编辑界面。中断模式：应用程序运行暂时中断，这时可以编辑代码，但不可以编辑界面。按F5键或单击“继续”按钮程序继续运行；单击“结束”按钮停止程序的运行。在此模式会弹出“立即”窗口。第8页，共52页。菜单栏可以通过鼠标、热键、键盘等多种方式执行菜

5、单命令。第9页，共52页。工具栏每种工具栏都有固定和浮动两种形式 第10页，共52页。5.2.1 窗体窗口第11页，共52页。5.2.2 属性窗口 第12页，共52页。5.2.3 工程资源管理器窗口 第13页，共52页。VB中的主要文件类型工程文件（.vbp）和工程组文件（.vbg）：工程文件中列出了组成工程的所有文件和组件清单，以及对编程环境的设置（如，字体、工具箱中的工具、属性窗口的位置等）。当一个程序中包含两个及两个以上工程，这些工程组成一个工程组。窗体文件（.frm文件）：该文件存储窗体上使用的所有控件对象和有关的属性、对象相应的事件过程、程序代码。一个应用程序至少包含一个窗体文件。标

6、准模块文件（.bas文件）：所有模块级变量和用户自定义的通用过程。通用过程是指可以被应用程序各处调用的过程。类模块文件（.cls文件）：可以用类模块来建立自己的对象。类模块包含用户对象的属性及方法。资源文件（.res）：用于存放多种资源的文件。 第14页，共52页。5.2.4 代码窗口 第15页，共52页。5.2.5 工具箱窗口 第16页，共52页。5.2.6 其它窗口 第17页，共52页。1. 对象 是基本的运行时的实体，如窗体、各种控件等，它包括作用于对象的操作（方法）和对象的响应（事件）。 将数据和处理这些数据的过程封装在一起.2. 类 类是一个抽象的整体概念 ，对象是类的实例化。类与对

7、象是面向对象程序设计语言的基础。 以“汽车”为例，说明类与对象的关系。 汽车是一个笼统的名称，是整体概念，我们把汽车看成一个“类”，一辆辆具体的汽车（比如你的汽车）就是这个类的实例，也就是这个类的对象。5.3面向对象程序设计的基本概念第18页，共52页。对象的三要素 （1）属性 对象的性质，即用来描述和反映对象特征的参数。 5.3面向对象程序设计的基本概念属性窗口设置和 对象.属性属性值 如：Command1.Caption=确定”“对象属性属性值第19页，共52页。对象的三要素（2）方法 对象的行为，即将一些通用的过程编写好并封装起来，作为方法供用户直接调用。 5.3面向对象程序设计的基本概

8、念对象方法的调用格式为：对象. 方法 参数名表 如：Form1.Print ”欢迎您使用Visual Basic 6.0!”第20页，共52页。对象的三要素响应对象的动作称为事件，它发生在用户与应用程序交互时。如单击控件、鼠标移动、键盘按下等。事件过程 指附在该对象上的用户编写的程序代码,是事件的处理程序。 事件驱动过程 是图形用户界面的本质，由用户控制而代码作出响应。5.3面向对象程序设计的基本概念第21页，共52页。可以把属性看作一个对象的性质，把方法看作对象的动作，把事件看作对象的响应。5.3面向对象程序设计的基本概念第22页，共52页。VB程序的编制过程：新建工程根据需要往窗体添加控件

9、设置控件属性添加代码试验运行（应先保存）5.3面向对象程序设计的基本概念第23页，共52页。（1） Name名称属性（任何对象都具有的） 创建的对象名称,有默认的名.在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。（2） Height、width、top和left属性 单位为twip：1 twip=1/20点=1/1440英寸=1/567cm 属性5.4窗体常用的属性、事件和方法基本属性第24页，共52页。 注意：这四个属性决定窗体（或控件）的大小，在容器中的位置。如下图。第25页，共52页。(3)Caption 标题属性：决定出现在窗体的标题栏上的文本内容，也是当窗体被最小化后出现

10、在窗体图标下的文本。如图2-2中窗体的Caption属性值是“VB窗体”(4 )字体Font属性组 FontName属性是字符型，决定对象上正文的字体（缺省为宋体）。 FontSize属性是整型，决定对象上正文的字体大小。 FontBold属性是逻辑型，决定对象上正文是否是粗体。 FontItalic属性是逻辑型，决定对象上正文是否是斜体。 FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。 FontUnderLine属性是逻辑型，决定对象上正文是否带下划线。 基本属性第26页，共52页。(6) Visible属性（逻辑值） 决定控件是否可见 True ：运行时控件可见（

11、缺省值） 。 False：运行时控件隐藏，用户看不到，但控件本身是存在的。基本属性(5) Enabled属性（逻辑值） 决定控件是否可操作。 True ：允许用户进行操作，并对操作出响应（缺省值） 。 False：呈暗淡色，禁止用户进行操作。第27页，共52页。(7)BackColor属性和ForeColor属性 BackColor属性用于返回或设置对象的背景颜色， ForeColor属性用于返回或设置在对象里显示图片和文本的前景颜色。它们是十六进制长整型数据在程序代码中可用Windows 运行环境的红-绿-蓝 (RGB) 颜色方案，使用调色板或在代码中使用 RGB 或 QBColor 函数指

12、定标准RGB颜色。Eg:将窗体Form1的背景色设置为红色，则可使用下面三种情况： Form1.BackColor = RGB(255, 0, 0) Form1.BackColor = &HFF& Form1.BackColor = vbRed 基本属性第28页，共52页。(1)MaxButton最大化按钮和MinButton最小化按钮：当值为 Ture，有最大或最小化按钮，False则无。 (2)Icon 控制图标属性：返回或设置窗体左上角显示或最小化时显示的图标。 注意：此属性必须在ControlBox属性设置为Ture才有效 (3)ControlBox控制菜单框属性：设置Ture为有，如

13、设置为False则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture。属性窗体的其它常用属性第29页，共52页。(4)Picture图片属性：设置窗体中要显示的图片。加载图片操作同Icon 控制图标属性。 (5)BorderStyle：边框风格, 通过改变 BorderStyle 属性，可以控制窗体如何调整大小。 0-None：无边框； 1-Fixed Single：单线边框，不可以改变窗口大小； 2-Sizable：双线边框，可以改变窗口大小； 3-Fixed Double：双线框架，不可以改变窗口大小。 4-Fixed Tool

14、 Window:窗体外观与工具条相似。有关闭按钮 ，不可以改变窗口大小。 5-Sizable Tool Window：窗体外观与工具条相似。有关闭按钮 ，可以改变窗口大小。窗体的其它常用属性第30页，共52页。(7) AutoRedraw属性 该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出。 当为True时，重新还原该窗体以前的画面。 当为False时，则不重画AutoRedraw属性。窗体的其它常用属性(6) WindowsState属性0-Normal：正常窗口状态，有窗口边界

15、；1：最小化状态，以图标方式运行；2：最大化状态，无边框，充满整个屏幕。 第31页，共52页。(1) Click/DblClick：单击/双击窗体触发。 (2) Load：窗体被装入时触发的事件。该事件通常用来在启动应用 程序时对属性和变量进行初始化。 (3)Unload事件 卸载窗体时触发该事件。 (4)Resize事件 无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件。事件最常用的事件第32页，共52页。常用方法 (1)Print方法 形式: 对象.PrintSpc(n)|Tab(n)表达式列表；|， 作用: 在对象上输出信息对象：窗体、图形框或打印机(Pint

16、er) ,省略对象在窗体上输出。Spc(n)函数：插入n个空格，允许重复使用。Tab(n)函数：左端开始右移动n列，允许重复使用。；(分号)：光标定位上一个显示的字符后。，(逗号)：光标定位在下一个打印区的开始位置处。每个打印区占14列。无；，换行。 开始打印的位置是由对象的CurrentX和CurrentX属性决定，缺省为打印对象的左上角0，0。方法是面向对象故使用的形式: 对象.方法第33页，共52页。Eg:在窗体Form1的单击事件中写入如下代码：Private Sub Form1_Click()a = 10: b = 3.14: c = 100Print a=; a, b=; bPri

17、nt a=; a, b=; bPrint a=; a, b=; bPrint 空一行Print ; a=; a, b=; bPrint a=; a, Tab(18); b=; bPrint a=; a, Spc(18); b=; b PrintPrint a=; a, b=; bPrint Tab(18); “a=”; a, “b=”; b 从第18列开始打印输出Print Spc(18); a=; a, b=; bEnd Sub第34页，共52页。(3) Move方法 形式 : 对象.Move 左边距离，上边距离，宽度，高度 作用 : 移动窗体或控件，并可改变其大小。 对象：可以是窗体及除时

18、钟、菜单外的所有控件，省略代表窗体。 左边距离，上边距离，宽度，高度：数值表达式，以twip为单位。如果是窗体对象，则“左边距”和“上边距”是以屏幕左边界和上边界为准。其它则是以窗体的左边和上边界为准。常用方法(2) Cls方法 形式 : 对象.Cls 作用 : 清除运行时在窗体或图形框中显示的文本或图形。 注意 : 不清除在设计时的文本和图形。清屏后坐标当前回到原点。第35页，共52页。Eg:使用Move方法移动一个窗体。双击窗体，窗体移动并定位在屏幕的左上角，同时窗体的长宽也缩小一倍。 为了实现这一功能，可以在窗体Forml的“代码”窗口中输入下列代码：Private Sub Form_D

19、blClick()Form1.Move 0,0,Form1.Width/2,Form1.Height/2End Sub第36页，共52页。(4)Show(显示)方法 Show方法用于在屏幕上显示一个窗体，调用 Show 方法与设置窗体 Visible 属性为 True 具有相同的效果。其调用格式如下： 窗体名.Show vbModal | vbModeless常用方法说明 （1）它有两种可能值：vbModal（缺省）或vbModeless，Show方法的可选参数表示从当前窗口或对话框切换到其他窗口或对话框之前用户必须采取的动作。当参数为vbModal时，要求用户必须对当前的窗口或对话框做出响应

20、，才能切换到其他窗口。（2）如果要显示的窗体事先未装入，该方法会自动装入该窗体再显示。 第37页，共52页。(5)Hide(隐藏)方法Hide方法用于使指定的窗体不显示，但不从内存中删除窗体。其调用格式为： 窗体名.Hide常用方法 说明：当一个窗体从屏幕上隐去时，其Visible属性被设置成False，并且该窗体上的控件也变得不可访问，但对运行程序间的数据引用无影响。若要隐去的窗体没有装入，则Hide方法会装入该窗体但不显示。 第38页，共52页。Eg:实现将指定的窗体在屏幕上进行显示或隐藏的切换。 为了实现这一功能，可以在窗体Forml的“代码”窗口中输入下列代码：Private Sub

21、Form_Click() Form1.Hide 隐藏窗体 MsgBox 单击确定按钮，使窗体重现屏幕 显示信息 Forml.Show 重现窗体End Sub第39页，共52页。Eg: 显示图形 Private Sub Form_Click() For i = 1 To 5 Print Tab(i); String(6 - I, ); Spc(6); String(I, ) Next i End Sub注意：String(number, character)返回指定长度重复字符的字符串。考虑：若把Spc(6)换成Tab(6)，效果如何？第40页，共52页。一.命令按钮CommandButton

22、接受用户输入的命令.输入命令可以有三种方式: （1）鼠标单击； （2）按Tab键焦点跳转到该按钮, 再按回车键； （3） 快捷键（Alt+有下划线的字母）（一）属性 1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font等与窗体的使用相同。 2常用属性 （1）Caption: 标题属性命令按钮显示的内容，可在某字母前加 “&“设置快捷键。例如： &Ok ,显示 Ok5.5 命令按钮、标签、文本框第41页，共52页。（2） Default：确认属性（逻辑值），设置为True时，按Enter键相当于用鼠标器单击了该按钮。 注意：在一个窗体只能的一

23、个按钮的Default设置为Ture（3）Cancel:取消功能属性（逻辑值），当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同。 注意：在一个窗体只能的一个按钮的Cancel设置为Ture（4）Value: 检查该按钮是否按下. 该属性在设计时无效.（5）Style : 确定显示的形式. 0 只能显示文字, 1 文字、图形均可 。 （6）Picture : 按钮可显示图片文件(.bmp和.Ico)，只有当Style属性值为1时有效（7）ToolTipText ：设置工具提示，和Picture结合使用。（二）方法、事件 Move、Setfocus方法； 单击事件Click第4

24、2页，共52页。二. 标签 Label 用于显示文本(输出)信息，不能作为输入信息的界面。1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与窗体的使用相同。2常用属性（1）Caption属性 Caption属性用来改变Label控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉。第43页，共52页。（2） Alignment属性 设置Caption属性中文本的对齐方式，共有三种可选值：

25、 0 左对齐(Left Justify)； 1 右对齐(Right Justify)； 2 居中对齐(Center Justify)。（3）BackStyle属性 该属性用于确定标签的背景是否透明。有两种情况可选：值为0时，表示背景透明，标签后的背景和图形可见；值为1时，表示不透明，标签后的背景和图形不可见。第44页，共52页。（5）WordWrap属性True: 文本卷绕；Label 控件垂直展开或缩短，以使其与文本和字体大小相适。水平大小不变。False:（缺省值）文本不卷绕；Label 水平地展开或缩短以使其与文本的长度相适，并且垂直地展开或缩短以使其与字体的大小和文本的行数相适应。 （

26、4）AutoSize属性 AutoSize属性确定标签是否会随标题内容的多少自动变化。如果值为True，则随Caption内容的大小自动调整控件本身的大小，且不换行；如果值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。第45页，共52页。 例 在窗体上，放置5个标签，其名称使用默认值Label1Label5，在属性窗口，按下表设置它们的属性 为了使 Label 保持水平方向尺寸不变并允许增加或减少文本，则应将 WordWrap 和 AutoSize 属性设置为 True。 如果希望 Label 控件只水平展开，则应将 WordWrap 设置为 False。如果不希望 L

27、abel 改变大小，应将 AutoSize 设置为 False。 注意 如果 AutoSize 被设置为 False，那么文本总是要卷绕，而不管 Label 控件的大小或 WordWrap 属性的设置如何。这可能使某些文本被隐藏，因为 Label 在任何方向上都不能展开。如果 AutoSize 和 WordWrap 都设置为 True，文本将会自动换行，而不会增加 Label 控件的大小，但有一种情况例外，那就是所输入的一个单词的长度要大于 Label 宽度。此时，AutoSize 属性有更高的优先级，并且 Label 的宽度将增加到适应这个长的单字。第46页，共52页。设置后各标签的显示如图

28、3、事件 标签可响应单击（Click)和双击（ DblClick）事件，但一般情况不对它进行编程默认控件名Name标题Caption有关属性设置Label1左对齐Alignment=0， BorderStyle =1 Label2水平居中Alignment=1，BorderStyle =1Label3自动AutoSize=True，WordWarp=False， BorderStyle =1Label4背景白BackColor= &H00FFFFFF&, BorderStyle =0Label5前景红ForeColor= &H000000FF&, BorderStyle =0第47页，共52页。三、 文本框 TextBox 文本框是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。（一） 属性1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。2常用属性（1）Text文本属性 在文本框中显示的正文内容存放在Text属性中。当